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Preface 



This manual is intended for users of the IBM 51 10 who 
know how to operate their system and are familiar with 
the APL or BASIC language. 

The users should read Chapter 1 for general information 
about the customer support functions. After becoming 
familiar with Chapter 1, they need only read the chapter 
that describes the function they want to use. 

Note: This major revision does not apply to machines using 
a diskette sort IMF or the loadable diskette sort. If your 
machine requires a diskette sort IMF or the loadable diskette 
sort, use the previous documentation supplied with the 
machine. 



Related Publications 

• IBM 5110 General Information and Physical Planning 
Manual, GA2 1-9300 

• IBM 5 1 10 APL Introduction, SA2 1 -930 1 

• IBM 51 10 APL User's Guide, SA21 -9302 

• IBM 5110 APL Reference Manual, S A2 1-9303 

• IBM 5110 BASIC Introduction, SA2 1 -9306 

• IBM 51 10 BASIC User's Guide, SA21 -9307 

• IBM 51 10 BASIC Reference Manual, SA21 -9308 

• The IBM Diskette General Information Manual, 
GA21-9182 



Second Edition (October 1978) 

This is a major revision of, and obsoletes, SA21-9311-0 and Technical 
Newsletters SN21-0280, SN21-0286, SN21-0288 and SN21-0296. Changes are 
periodically made to the information herein; before using this publication in 
connection with the operation of IBM systems, be sure you have the latest 
edition. 

This publication contains examples of data and reports used in daily business 
operations. To illustrate them as completely as possible, the examples include the 
names of individuals, companies, brands, and products. All of these names are 
fictitious and any similarity to the names and addresses used by an actual 
business enterprise is entirely coincidental. Use this publication only for the 
purposes stated in the Preface. 

Publications are not stocked at the address below. Requests for copies of IBM 
publications and for technical information about the system should be made to 
your IBM representative or to the branch office serving your locality. 

This publication could contain technical inaccuracies or typographical errors. Use 
the Reader's Comment Form at the back of this publication to make comments 
about this publication. If the form has been removed, address your comments to 
IBM Corporation, Publications, Department 245, Rochester, Minnesota 55901. 
IBM may use and distribute any of the information you supply in any way it 
believes appropriate without incurring any obligation whatever. You may, of 
course, continue to use the information you supply. 
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Chapter 1. Introduction 



The functions described in this manual, except for sort, are supplied by IBM on 
a tape cartridge or diskette. The Diskette Sort feature is a hardware option and 
can be ordered as a feature. The following is a list of the functions, the file 
names, and the associated tape and diskette file numbers. 



File Number 


File Name 


Description 


1 


LOADER 


Loader 


2 


INITIAL 


Diskette initialization 


3 


DDCOPY 


Diskette-to-diskette copy 


4 


TDTCOPY 


Tape-to-diskette copy 


4 


TDTCOPY 


Diskette-to-tape copy 


5 


TTCOPY 


Tape-to-tape copy 


6 


COMPRESS 


Diskette compress 


7 


LDISPLAY 


Label display 


8 


DRECOVER 


Diskette recovery 


9 


TRECOVER 


Tape data recovery 


10 


HRECOVER 


Tape header recovery 


11 


IMF 


IMF file 


12 


IMAGCOPY 


Image copy 



You can use one of the copy functions to copy the customer support functions 
from the IBM-supplied tape cartridge or diskette to one of your own. You can 
use any file number you want when you copy the customer support functions. 
The file numbers given in this manual refer to the IBM-supplied tape cartridge 
or diskette. 



OVERVIEW 



Diskette Initialization 

The diskette initialization function formats a diskette. The number of bytes in a 
sector and the number of sectors in a track determine the format. A diskette 
must be formatted before it can be used. You may also use the diskette 
initialization function to change the format of a diskette. Changing the format 
can increase the capacity of a diskette and sometimes can improve the 
performance of programs that use a diskette file. Any data on a diskette is 
destroyed by the diskette initialization function. 
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Copy Functions 

Four different copy functions are available. They provide for all possible 
combinations of copying between tapes and diskettes. 




Tape to Tape 



Tape to Diskette 



Diskette to Tape 



Diskette to Diskette 




The copy functions enable you to make another copy of a file for security 
reasons or to use in testing a program. You should maintain an extra copy 
(backup) of all your important files. These copies would help you retain the 
data in the files should the original files be accidentally lost or destroyed. To 
test your programs, you should use a copy of the file and not the original file. 
In this way, if the program should fail, you would not have to recreate or 
correct your original file. 



Recovery Functions 

The recovery functions allow you to correct most read errors on tape and 
diskette data files, tape and diskette header labels and diskette volume labels. 



Label Display 



The label display function displays and prints the diskette and tape labels. This 
printout is useful when a read error occurs on the label portion of a file. It is a 
good idea to get a printout of labels on all your files occasionally so that you 
have a record of the contents of each diskette or tape. 



Diskette Compress 

The diskette compress function moves all files on the diskette as close to 
cylinder as possible. When you free files and then mark new files on a 
diskette, space can be left between files. For example, you could free a 20K 
file in the middle of your diskette and then mark a 16K file. The 4K of space 
would not be used unless you marked a 4K file. The diskette compress 
function moves all the available space to the end of the diskette. 



Loader 



The loader function is used to load certain feature programs, such as the Serial 
I/O Adapter feature, into the system. The loader function is also used to 
maintain the language part of your system. Internal machine fixes (IMFs) are 
supplied by IBM to correct known problems and can be loaded into the 
machine with the loader. 



Diskette Sort 



The Diskette Sort feature of the IBM 5110 allows you to sort diskette record 
I/O files. This feature can be used to change the order of the records in a file 
so that a special report can be easily generated. The sort may also be used to 
put the input records for a program in order so that processing time is 
reduced. The Diskette Sort feature produces two types of output: standard (in 
which the records are sorted and written on the output file) and address out (in 
which the relative record number (addresses) of the sorted records are written 
on the output file). 



OPERATION 



The customer support functions on the tape or diskette are loaded into the 
machine with the link command. The syntax of the link command for APL is 
)LINK (device file number) [file name] and for BASIC it is LINK (file number), 
['file name',] (device). After a function is loaded, it is automatically executed. 
The Diskette Sort feature is resident (if the feature is installed) within the 
machine and is executed when a )SORT (for APL) or UTIL SORT (for BASIC) 
command is executed. For BASIC, the system device is changed to the default 
value by all the functions except sort. The Diskette Sort feature does not 
change the system device when it is executed from a procedure file. 

When the customer support functions are loaded, the ATTN key does not 
function the same as it does in the language mode. The ATTN key still clears 
the input line, but it will not stop the function when it is executing. 

Display messages are provided to assist you in using the functions. Each time 
a message is displayed you must enter some information or just press the 
EXECUTE key to have the function continue. Anytime a function (except for 
sort) is waiting for you to respond to a message, you can enter a * (asterisk) 
to allow you to restart or terminate the function. The * must be entered in 
position 1 of the input line. For sort you can enter STOP in positions 1 
through 4 of the input line to end the sort. 
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All customer support functions use the system's read/write storage (workspace 
for APL or workarea for BASIC). Therefore, any data you have In the 
machine should be saved before a function is used. Since I MFs and feature 
programs also use part of the system's read /write storage, at times there may 
not be enough room to load the customer support functions with the I MFs and 
feature programs loaded. 

Several of the functions use keyword statements followed by parameters. The 
parameters must be entered in the order shown. Each parameter must be 
separated from the next by a comma. When a parameter is omitted, the 
comma must still be entered. For example: 

Parameter 1 , Parameter 2 , Parameter 3 , 

or 
Parameter 1 , , Parameter 3 (when Parameter 2 is omitted) 



When tape or diskette files are used, the file number must be specified. The 
file name need not be used. If a file name is specified for a diskette input file, 
the system checks to make sure the file name agrees with the file number on 
the diskette. 

The customer support functions use a one-digit entry to indicate the tape and 
diskette drive. The entry used by the customer support functions and the 
equivalent APL or BASIC entry are: 



Physical Device 

Built-in tape 
Auxiliary tape 
Left drive, first unit 
Right drive, first unit 
Left drive, second unit 
Right drive, second unit 



Utility 


APL 


BASIC 


Entry 


Entry 


Entry 


1 


1 


E80 


2 


2 


E40 


1 


11 


D80 


2 


12 


D40 


3 


13 


D20 


4 


14 


D10 



FILE NAMES 



Certain rules must be followed when file names are used. The rules depend on 
the type of file, whether it is on tape or diskette, and the language that will 
use the file. 

The term nondata as used in the following chart means that the files contain 
programs (an APL save file, for example). A simple name, as used in the chart, 
consists of up to 8 alphameric characters. The first character of the name 
must be uppercase alphabetic (A-Z). The other characters of the name may be 
alphameric (A-Z, 0-9). For example, DATA, HISTORY, and WEEK21 are all 
simple names. A complex name, as used in the chart, consists of two or more 
simple names separated by a period. Up to 17 characters, including periods, 
are allowed in a complex name. For example, PAYROLL. DATA, 
WEEK21.DATA, and DATA.TEST.R21.A are all complex names. 



Rules for File Names 

Diskette Files 



APL (nondata) 

APL (data) 

APL (basic exchange) 

BASIC 

BASIC (basic exchange) 



Simple name. 

Simple or complex name. 

Simple name. 

Simple or complex name. 

Simple name. 



Tape Files 



APL (nondata) 



APL (data) 



Up to 11 characters. Valid characters are 
alphameric (A-Z, 0-9) and underscored 
alphabetics. The first character cannot be 
numeric (0-9). 

Up to 17 characters. All characters except the 
right parenthesis are valid. 



BASIC Up to 17 characters. All characters are valid. 

Each of the remaining chapters in this manual describes a customer support 
function. You need to read only the chapter that covers the function you want 
to use. The error codes are shown in Appendix C. 
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Chapter 2. Loader 



The loader function is used to load feature programs and to maintain the 
language part of your system. The internal machine fixes (IMFs) supplied by 
IBM to correct a problem are loaded into the system with the loader. You 
must load IMFs before you load any feature programs. 



OPERATION 



The loader function is loaded via the link command and is on file 1 on the 
IBM-supplied tape cartridge or diskette. The file name is LOADER. After the 
function is loaded, the following is displayed: 

LOADER FUNCTION 



OPTIONS: 

1 . LOAD FROM TAPE 

2, LOAD FROM DISKETTE 

ENTER OPTION NUMBER AND PRESS EXECUTE 



Enter a 1 if you are loading from tape, or a 2 if you are loading from a 
diskette. After the EXECUTE key is pressed, the following is displayed if you 
are loading from tape: 

ENTER TAPE DRIVE NUMBER AND PRESS EXECUTE 



ENTER FILE NUMBER AND PRESS EXECUTE 

Or if you are loading from diskette the following is displayed: 

ENTER DISKETTE DRIVE NUMBER AND PRESS EX ECU' 

ENTER FILE NAME OR NUMBER AND PRESS EXECUTE 



Enter the drive number (1 or 2 for tape; 1, 2, 3, or 4 for diskette) you will be 
using, then press the EXECUTE key. 
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To load the feature program from tape, enter the file number of the tape file. 
To load the feature program from diskette, enter either the file number or the 
file name of the diskette file. The feature program is loaded when the 
EXECUTE key is pressed. After the program is loaded, the following is 
displayed: 

feature name LOADED 

OPTIONS: 

1 . RESTART FUNCTION 

2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 



The procedure to load an IMF is similar to loading a feature program. When 
the loader function determines that the tape or diskette file contains an IMF 
and not a feature program, a special message is displayed. How to use the 
loader after this message is displayed is explained in IBM 5110 Language 
Support Maintenance Information Manual, SY31-0581. 



Chapter 3. Diskette Initialization 



The diskette initialization function is used to initialize a diskette. The following 
are some reasons you may want to use this function: 

• The diskette was exposed to a strong magnetic field, and the data can no 
longer be read. 

• A defect has occurred in one or two cylinders, and you want to assign one 
or two of the spare cylinders to replace the defective cylinders. 

• You want to change the format of the diskette (number of sectors per track 
and bytes per sector) to change the diskette capacity. 

• You want to increase the area of a Diskette 2D type of diskette used for 
data set labels. 

Diskette initialization does the following: 

• Creates and writes the ER MAP label. This label is used to record the 
location of any defective cylinders. Up to two defective cylinders are 
allowed on each diskette. If more than two cylinders are defective, the 
diskette should not be used. 

• Creates and writes a volume label on the diskette. 

• Sets aside space for the data set labels. 

• Allocates a file (file 1). 

• Writes the ID field for each sector. 

• Writes data and then reads it back on all tracks. This is done to locate any 
defective areas on the diskette. When a defective area is found, one of the 
spare cylinders is automatically assigned to replace the defective one. 

• Writes the volume identifier and owner identifier on the diskette. 
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OPERATION 



Diskette initialization is loaded via the link command and is on file 2 on the 
IBM-supplied tape cartridge or diskette. The file name is INITIAL. After the 
function is loaded, the following is displayed: 

D I Sl< ETTE I N I T I AL I Z AT I ON F r UNCT I ON , 
OPTIONS: 

1 . D E S C R :i! P T 1 N F F U N T I ON. 

2. RETURN TO SYSTEM. 

3. ENTER INITIALIZATION COMMAND. 

ENTER OPTION NUMBER IN POSITION ONE AND PRESS EXECUTE TO 
CONTINUE. 

When a 3 is entered, the following is displayed: 

I N I T V 1... ■••■ I D , W N E R - 1 D , F R M A T .■ S E Q U E N C E N U M B E R 



ENTER APPROPRIATE INITIALIZATION COMMAND AND PRESS EXECUTE. 
IN IT .„. 



An entry of 1 provides 3 displays that define the operation of the function. 
The following is displayed when a 1 is entered: 

D I S l< E T T E I N I T I A L I Z A T 1 N F U N C T 1 N . 

DISKETTE INITIALIZATION REFORMATS THE DISKETTE. ALL DATA AND 
P R GRAM F I L E S W I L L B E E R A S E D . T H E R E F R E > B E F R E I NITIATING T H E 
DISKETTE INITIALIZATION FUNCTION, ENSURE THERE IS NO DATA IN ANY 
FILE ON THIS DISKETTE THAT WILL EVER BE USED AGAIN. 



P R E S S E X E C U T E T N T I N U E = 
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After the EXECUTE key is pressed, the first of three displays explaining the 
initialization command appears. Press the EXECUTE key after the first two 
displays. Enter the required parameters before pressing the EXECUTE key for 
the third display. The three displays are: 

I NIT COMMAND HAS TNT. S FORMAT: 

I NIT VOL- ID i OWNER-ID , FORMAT , SEQUENCE NUMBER 

VOL -ID CAN BE UP TO SIX ALPHAMERIC CHARACTERS, ENTER COMMA IF 
DEFAULT VALUE (VOLID) IS DESIRED. 

OWNER-ID CAN BE UP TO 14- ALPHAMERIC CHARACTERS, ENTER COMMA II" 
DEFAULT VALUE (OWNERID) IS DESIRED. 



PRESS EXECUTE TO CONTINUE, 

Press the EXECUTE key to get the second display. 

FORMAT IS i, 2, 3, '■!• , 5, 6, 7, 8 OR 9: 

1, 2; AND 3 EQUAL DISKETTE SECTOR SIZES 128, 256, AND 512, 
RESPECTIVELY FOR DISKETTE i. 

i-l-, 5, AND 6 EQUAL DISKETTE SECTOR SIZES 128, 256, AND 512, 
RESPECTIVELY FOR DISKETTE 2, 



7, i 



I), AND 9 EQUAL DISKETTE SECTOR SIZES 256, 512, AND 102"+, 



R E S P E C T I V E L Y F R D I S K E T T E 2 D . 

FORMATS 1, M-, AND 7 ARE EXCHANGE FORMATS 

PRESS EXECUTE TO CONTINUE, 
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Press the EXECUTE key to get the third display. 

'SEQUENCE .NUMBER" IS OPTIONAL. DEFAULT IS SEQUENTIAL SECTOR 
SEQUENCE, THIS FIELD IS A TWO DIGIT FIELD THAT CAN BE USED TO 
SPECIFY A SECTOR SEQUENCE INCREMENT THAT RESULTS IN A 
NONSEQUENTIAL SECTOR SEQUENCE ON THE DISKETTE. 



IN IT VOL-IDi OWNER-ID, FORMAT, SEQUENCE NUMBER 



:nter appropriate initialization command and press execute 
:nit „.. . 

Enter the parameters for the I NIT command, then press the EXECUTE key. 



The INIT Command 

The I NIT (initialization) command specifies the volume identification, owner 
identification, format, and sector sequence. 

Syntax 

INIT [vohid],[owner*id],format[, sequence- number] 



where: 



INIT 



is the command and must be in positions 1 
through 4. 



vol -id. 



(optional) is the volume identifier field. A 
maximum of 6 alphameric characters is allowed 
in this field. If this field is left blank and only the 
comma is entered, the default name of VOLID is 
used as the volume identifier. 



Owner- id. 



(optional) is the owner identifier field. A 
maximum of 14 alphameric characters is allowed 
in this field. If this field is left blank and only the 
comma is entered, the default name of 
OWN ERID is used as the owner identifier. 



format. 



specifies the format for the diskette. The valid 
entries are 1 through 9. See -Diskette Format, 
which follows, for more information on the 
formats. 
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sequence-number 



(optional) specifies a sector numbering sequence 
other than sequential. The number in this field is 
used as a fixed value when the sector numbers 
are incremented on the diskette. See Diskette 
Format for more information on sector sequence. 
If this field is left blank, the default value of 01 
(sequential sector numbering) is assumed. 



The following are examples of the I NIT command. 



Command Keyword 
Volume Identifier 
Owner Identifier 
Format Number 



I — Entry for Sector Sequence 



:i: n :i: t m a s t e r , m a c c a r t h y , e , o :i. 



Command Keyword 

No Volume Identifier (used default of VOLID) 

No Owner Identifier (used default of OWNERID) 

Format Number 

No Sector Sequence Entry (used default-sequential) 



I NIT 



When format 7, 8, or 9 is specified for the INIT command, the following is 
displayed: 



ADDITIONAL FILE LABELS CAN BE PLACED ON THIS 
NUMBER OF FILE LABELS CAN BE FROM 71 TO .1. 07 
FOLLOWING AT POSITION ONE AND PRESS EXECUTE. 



DISKETTE. THE 
ENTER ONE OF 



THE 



OPTIONS: 

BLANK ALLOTS 

1 ALLOTS 175 

2 ALLOTS 279 

3 ALLOTS 383 



71 FILES 
FILES 
FILES 
FILES 



ALLOTS 
ALLOTS 
ALLOTS 



i! 8 7 
591 
695 



FIL 
FII.. 



ALLOTS 
ALLOTS 
ALLOTS 



799 FILES 
903 FILES 
10 07 FILES 
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Additional space for file labels may now be specified. The valid entries are 
blank and digits 1 through 9. The number of labels and the diskette space 
used by each entry follows. 





Number of 


Cylinders IS 


Entry 


Labels 




blank 


71 





1 


175 


and 1 


2 


279 


through 2 


3 


383 


through 3 


4 


487 


through 4 


5 


591 


through 5 


6 


695 


through 6 


7 


799 


through 7 


8 


903 


through 8 


9 


1007 


through 9 



After the EXECUTE key is pressed, the following is displayed: 

INSERT DISKETTE TO BE INITIALIZED IN DESIRED DRIVE. ENTER ONI 
DIGIT DRIVE NUMBER TO BE USED IN THE FIRST POSITION AND 
P R E S S E X E C U T E T C N T I N U E . 

Insert the diskette to be initialized in a drive. Enter the one-digit diskette drive 
number (1, 2, 3, or 4) for that diskette drive. Then press the EXECUTE key. 
After initialization is complete, and if no defective cylinders were found, the 
following is displayed: 

D I S !< E T T E I N I T I A !... I Z A T 1 N C M P L E T E , 

THERE ARE NO DEFECTIVE CYLINDERS ON THIS DISKETTE. 



PRESS EXECUTE TO CONTINUE 



14 



If defective cylinders were found, the following is displayed: 

d :i: s i< e: t t e i n :i: t :i: a l :i: z at i o n c o h p l e t e . 

THE FOLLOWING CYLINDERS ARE DEFECTIVE 
yy 



PRESS EXECUTE TO CONTINUE 



The cylinder number, indicated by XX, of any defective cylinder is displayed. 
These numbers are recorded in the ERMAP label located at cylinder sector 5. 
Up to two defective cylinders are allowed on each diskette. The diskette must 
be replaced if more than two cylinders are defective. The diskette must also 
be replaced if cylinder is defective. Cylinder is used by the system to 
record information about the diskette. 



Hints 



• Alphameric characters must be used for the volume and owner identifier 
fields. A maximum of 6 characters can be used for the volume identifier 
and 14 characters for the owner identifier. 

• Error codes are displayed if any of the following conditions are found when 
the function is checking the header label: 

• Secure data set 

• Write- protected data set 

• Data set containing data 

• Nonblank expiration date field 

Once one of these conditions is encountered, the error code is displayed and 
the option can be selected. If you elect to continue, no further checking of the 
labels is performed. 

• Initialization can terminate unsuccessfully if an I/O error is encountered, if 
more than two defective cylinders were encountered, if cylinder is 
defective, or if any extended label cylinder is defective. 
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DISKETTE FORMAT 

Nine different diskette formats are available. The following chart shows the 
number of tracks per cylinder, sectors per track, bytes per sector, and the valid 
entries for the sequence- number field of the I NIT command. 



Diskette 




Tracks per 


Sectors 


Bytes per 


Capacity 


Valid Sector 


Type 


Format 


Cylinder 


per Track 


Sector 


Tracks 1-74 


Sequence Number 




1* 


1 


26 


128 


246,272 


01-13 


1 


2* 


1 


15 


256 


284,160 


01-08 




3** 


1 


8 


512 


303.104 


01-04 




4* 


2 


26 


128 


492,544 


01-13 


2 


5* 


2 


15 


256 


568,320 


01-08 




6** 


2 


8 


512 


606,208 


01-04 


or 


7* 


2 


26 


256 


985,088 


01-13 


2D 


8 


2 


15 


512 


1,136,640 


01-08 




a** 


2 


8 


1024 


1,212,416 


01-04 



Exchange format (see Diskette Exchange Files) 
** Maximum capacity 
*** Can only be used for data files 



Diskettes obtained from IBM have a colored label that shows the diskette type. 
The color of the label indicates the sector size used when IBM initialized the 
diskette. 



Label Color 


Sector Size 


White with black print 


128 


Red with white print 


256 


Blue with white print 


512 


Yellow with black print 


1024 



Format 1, 2, or 3 can be used only with a Diskette 1 type of diskette. Formats 
4 through 9 can be used with a Diskette 2 or Diskette 2D type of diskette. 
Diskette 1 diskettes are designed for single-side recording; Diskette 2 and 
Diskette 2D diskettes use both sides for recording. The higher the format 
number, the more data that can be recorded on the diskette. 
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The sector sequence number column contains the valid entries for the 
sequence-number field of the INIT command. This field modifies the normal 
sequence numbering of the sectors on the diskette. For example, assume 
format 1 and a sector sequence number of 02. The sectors would be 

numbered as follows: 1,3, 5, . . . . 23, 25, 2, 4 24, 26. For a format 1 

and sector sequence number of 13, the sectors are alternately numbered as 
follows: 1, 14, 2, 15, ... ... 12, 25, 13, 26; This may enable you to read sector 

1, process the data, and get ready to read sector 2 before the diskette rotates 
past sector 2. If the sectors were numbered sequentially, this type of 
processing would not be possible. 

You can reduce the time required to search a key file by changing the sector 
numbering sequence. If you have a key larger than 20 characters, the internal 
processing to compare the key could take long enough to prevent the reading 
of the next sector. To provide sufficient time to compare the key and get 
ready to read the next sector, alternately number the sectors on the diskette. 
To alternately number the sectors, specify the largest possible sector sequence 
number. For format 1, 4, or 7 specify 13; for format 2, 5, or 8 specify 08; and 
for formats, 6, or 9 specify 04. Other files on the diskette may process 
slower as a result of the sector numbering being changed. 



Additional File Labels 

A file label is required for each file you have on the diskette. Normally, cylinder 
starting at sector 8 is used for labels. A Diskette 1 type of diskette (formats 
1, 2, and 3) has room for 19 labels. A Diskette 2 type of diskette (formats 4, 
5, and 6) has room for 45 labels- A Diskette 2D type of diskette (formats 7, 8, 
and 9) has room for 71 labels on cylinder 0. 

Additional cylinders may be used for labels with format 7, 8, or 9. Each 
additional cylinder provides room for 104 additional labels. You should 
consider providing additional space for labels if you plan to use many small 
files on the diskette. A cylinder assigned for additional labels cannot be used 
for data. Therefore, assigning additional cylinders for labels reduces the 
number of cylinders that can be used for data and thus reduces the capacity of 
the diskette. Also, with an extended label area, some diskette operations such 
as mark can take longer. 
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Diskette Exchange Files 

Diskette exchange files can be read and created with the 5110. Format 1, 4, or 
7 diskettes must be used for exchanges files. Formats 1 and 4 are used for 
basic exchange files, and normally format 7 for H-type interchange files. Basic 
exchange files use 128-byte sectors. H-type exchange files use 256-byte 
sectors. The exchange files: 

• Must have a simple name 

• Must have unblocked, unspanned record format (record length must not 
exceed the sector size) 

• Must use a sequential access method 

• For format 1 diskettes, must use sequential sector numbering and have the 
file between cylinders 1 and 73 

• For formats 4 and 7, need not use sequential sector sequence numbering 
and can use cylinders 1 through 74 

• For format 7, must have a file number from 1 to 71 (data set label must not 
be in the extended label area) 
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Chapter 4. Diskette-to-Diskette Copy and Image Copy 



The diskette-to-diskette copy function copies an entire input diskette to an 
output diskette, copies a group of files from an input file to an output file, or 
copies a selected single input file to an oJtput file. When the entire diskette is 
copied, the output diskette will be automatically compressed. When a single 
file is copied, you must mark the output file before the copy operation is 
started. When an entire diskette or a group of files from a diskette is copied, 
the format number of the output diskette must be the same as or larger than 
the format number of the input diskette, and the sector size of both diskettes 
must be the same. The format number represents the capacity (density) of the 
diskette. The higher the number the greater the capacity. 

Your image copy function copies an entire input (copied from) diskette to an 
output (copied to) diskette without compressing space that may have been left 
between files. This function provides an exact copy of your input diskette for 
backup files and testing purposes. When more than 25 files are copied, image 
copy will be faster than diskette-to-diskette copy. 

OPERATION OF DISKETTE-TO-DISKETTE COPY 

The diskette-to-diskette copy function is loaded via the link command and is 
on file 3 on the IBM-supplied cartridge or diskette. The file name is DDCOPY. 
After the function is loaded, the following is displayed: 

D I S !< E T T E "!" Ii I S l< E T I" E C P Y E U N C T I H 
OPTIONS ARE: 

:l. , COPY ONE PILE 

2. COPY ALL PILES 

3. COPY A GROUP OF FILES 



S E I... !::. C T P I .!. N , P R E S S E X !::. U | |» 

Enter a 2 to copy the entire input diskette to the output diskette. Enter a 3 to 
copy a group of files from the input diskette to the output diskette. Enter a 1 
to copy a single input file to an output file. To select the number of drives you 
are going to use, the following is displayed: 

HOW MANY DISKETTE DRIVES WILL YOU BE USING 
OPTIONS ARE: 

1 . ONE DISKETTE DRIVE 

2. TWO DISKETTE DRIVES 

SELECT OPTION. PRESS EXECUTE 

Enter a 1 or 2 to select the number of the diskette drives. 
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One-Diskette-Drive Copy 

If you select the one-diskette-drive option, the following is displayed: 

:i: n s e r t d :i: s t< e t t e b e :i: n g c o p i e d f r g m 

I N J S E I... E C T E D D I $ l< E T T E D R I V E 
ENTER DRIVE NUMBER i PRESS EXECUTE 

Enter a 1, 2, 3, or 4 to select the diskette drive you will be using.. Then insert 
the diskette used for input into that drive and press the EXECUTE key. 

The following is then displayed if you are copying a single file: 

ENTER RILE NUMBER TO BE COPIED FROM 



ENTER FILE NUMBER TO BE COPIED TO 

Enter the file number you want to use. The file number can have up to four 
numeric digits. 

If you are copying a group of files, the following is displayed: 

ENTER STARTING FILE NUMBER TO BE COPIED FROM 

ENTER ENDING FILE NUMBER TO BE COPIED FROM 



ENTER STARTING FILE NUMBER TO BE COPIED TO 



Enter the file number you want to use. The file number can have up to four 
numeric digits. The output file will be marked by the copy function. 
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When the copy operation is completed, the following is displayed: 

DISKETTE COPY COMPLETED 

OPTIONS ARE: 

1 , R E S T A R T C P Y F U N T 1 N 
2, RETURN TO THE SYSTEM 

E N T E R P T 1 N , P R E S S E X E C U T E 



Hints 



• When an entire diskette or a group of files is copied: 

- The sector size of the input and output diskettes must be the same. 

- The format number of the output diskette must be the same or larger 
than the input diskette. 

- The label area on the output diskette must be the same size or larger 
than the input diskette. 

- The ending file number to be copied from must be equal to or greater 
than the starting file number to be copied from. 

• When copying a single file, make sure the output file: 

- Is marked 

- Does not contain valuable data 

- Is large enough to contain all the data on the input file 

- Is not write- or date- protected 

• When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

• When entering a file name for the output file, make sure the name conforms 
to the rules for simple or complex names. 

• When an entire diskette is copied, the contents of the input diskette may 
not fit on the output diskette if the input diskette files were created on a 
different system. The 5110 allocates files in increments of 1K (1024 bytes); 
other systems may allocate files differently. For example, assume that the 
input diskette had a sector size of 1 28 bytes per sector, with a file 
containing only one sector. When this file is copied, the copy function will 
mark a 1K output file. This 1K file contains eight 128-byte sectors; the first 
sector contains data, and the last seven are empty. If the input diskette is 
full or nearly full, and has several files in which the preceding conditions 
exist, the output diskette may be filled before all files are copied from the 
input diskette. 

• When an entire diskette is copied, all files on the output diskette are freed 
prior to the copy procedure. Make sure the output file does not contain 
important data. 
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OPERATION OF IMAGE COPY 

The image copy function is loaded via the link command and is on file 12 on 
the IBM-supplied cartridge or diskette. The file name is IMAGCOPY. After the 
function is loaded, the following is displayed: 

IMAGE COPY FUNCTION 

HOW MANY DISKETTE DRIVES WILL YOU BE USING , 

OPTIONS ARE: 

1 .ONE DISKETTE DRIVE 
2, TWO DISKETTE DRIVES 

ENTER OPTION NUMBER AND PRESS EXECUTE 

Enter a 1 or a 2 to select the number of diskette drives. 

One-Diskette-Drive Copy 

If you select the one-diskette-drive option, the following is displayed: 

INSERT DISKETTE BEING COPIED FROM 

INTO SELECTED DISKETTE DRIVE 

ENTER DRIVE NUMBER AND PRESS EXECUTE 



Enter a 1, 2, 3, or 4 to select the diskette drive you will be using. Then insert 
the diskette used for input into that drive and press the EXECUTE key. 

When files containing data to be copied are found on the input diskette, data 
is read into the system's read /write storage. When the read /write storage is 
filled, the following is displayed: 



INSERT DISKETTE BEING COPIED TO 
PRESS EXECUTE 



You should now remove the diskette used for input from the drive. Then insert 
the diskette to be used for output and press the EXECUTE key. 
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The data in read/write storage is then written to the output diskette, and the 
following is displayed : 



INSERT DISKETTE BEING COPIED FROM 
PRESS EXECUTE TO CONTINUE 



You should now remove the output diskette from the diskette drive and insert 
the input diskette. 

This procedure (reading, changing diskettes, writing, changing diskettes again) 
continues until all data is copied. When the copy operation is completed, the 
following is displayed: 



IMAGE COPY COMPLETE 

OPTIONS ARE: 

1 . RESTART FUNCTION 
2, RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 



If the diskette type, record length or label extension fields differ between the 
input diskette and the output diskette, the following is displayed: 



INPUT OUTPUT 



RECORD LENGTH 


XXX 


XXX 


DISKETTE TYPE 


XX 


X X 


EXTENDED LABELS 


X 


X 



OPTIONS ARE: 

1 . RESTART FUNCTION 
2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 

COPY ERROR M-15 



You must now initialize the output diskette to the same format as the input 
diskette, or select another diskette for output that has the same format as the 
input diskette. 
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If there are marked files on the output diskette, the following is displayed: 

DISKETTE BEING COPIED ONTO ALREADY MARKED 

OPTIONS ARE: 

:!. , RESTART FUNCTION 
2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 



You must now delete all marked files on the output diskette, or select another 
diskette for output that has the same format as the input diskette and contains 
no marked files. 

If an error occurs while data is being copied onto the diskette, the function 
attempts to mark the file in which the error occurred as unused. If the file 
cannot be marked as unused, the following is displayed: 



COPY TERMINATED BECAUSE OF I/O ERROR 

FILE XXXX IS INVALID ON OUTPUT DISKETTE 

OPTIONS ARE: 

:l. . RESTART FUNCTION 
2, RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 

D I S l< E T T E E R R OR XX ON DRIVE X 

During read /write header execution, the image copy will allow 10 files to be in 
error. If 10 files or less are in error, the file numbers in error are displayed 
within the COPY COMPLETE message: 

IMAGE COPY COMPLETE 

HEADERS FOR FILES LISTED ARE INVALID 

XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX XXXX 

OPTIONS ARE: 

1 . RESTART FUNCTION 
2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 
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If more than 10 files are in error when the headers are being copied onto the 
diskette, the following is displayed: 

COPY TERMINATED BECAUSE OF I/O ERROR 

THE HEADERS FOR THE LISTED FILES ARE INVALID 

XX XX XXX X XXX X XXXX XX XX XXXX XXXX XX XX XX XX XXX X XXX X 

ON THE OUTPUT DISKETTE 

OPTIONS ARE: 

1. RESTART FUNCTION 
2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 
DISKETTE ERROR XX ON DRIVE X 



Two-Diskette-Drive Copy 

If you selected the two-diskette-drive option, the following is displayed: 

■IN S E R T D I S K E T T E B E I N P I E D F R M 
INTO SELECTED DISKETTE DRIVE 

ENTER DRIVE NUMBER AND PRESS EXECUTE 



INSERT DISKETTE BEING COPIED TO 
I N T S E L E C T E D D I S !< E T T E D R I V E 

ENTER DRIVE NUMBER AND PRESS EXECUTE 

Enter the number of the diskette drives you want to use for input and output. 
Enter a 1, 2, 3, or 4 to select the diskette drive you will be using. 

When the copy operation is completed, the following is displayed: 



IMAGE COPY COMPLETE 

OPTIONS ARE: 

I . RESTART FUNCTION 
2, RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 

Note: The format, marked file, and input/output error messages previously 
discussed for the one-diskette-drive system apply to the two-diskette-drive 
system. 
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Hints 



The format of the output diskette must be equal to the format of the input 
diskette. 

The output diskette must not contain- any marked files. 
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Chapter 5. Tape-to-Diskette Copy 



Tape-to-diskette copy and the diskette-to-tape copy are the same function. 
The diskette-to-tape copy is explained in Chapter 6. A chart at the end of this 
chapter shows the file types that can be copied. The file name of the tape 
input file is assigned to the diskette output file. However, if the file name of 
the tape input file does not conform to the rules for simple or complex names, 
a valid file name must be entered. The diskette output file must be marked 
before the copy operation is started. 



OPERATION 



Tape-to-diskette copy is loaded by the link command and is on file 4 on the 
IBM-supplied tape cartridge and diskette. The file name is TDTCOPY. After 
the function is loaded, the following is displayed: 

TAPE TO DISKETTE, DISKETTE TO TAPE COPY FUNCTION 



OPTIONS ARE 



1 . TAPE TO DISKETTE COPY, 

2, DISKETTE TO TAPE COPY, 

E N T E R P 7' ION, P R E S S E X E C U T E 



Enter a 1 and press the EXECUTE key to select the tape-to-diskette copy. 
The following is then displayed: 



INSERT TAPE INTO TAPE DRIVE YOU WILL BE USING 
E N T E R D R I V E N U M B E. R , P R E S S E X E C U T E 



INSERT DISKETTE INTO DISKETTE DRIVE YOU WILL BE USING 
ENTER DRIVE NUMBER, PRESS EXECUTE 
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Enter a 1 or 2 to select the tape drive you are using for the input file. Enter a 
1 , 2, 3, or 4 to select the diskette drive you are using for the output file. After 
the EXECUTE key is pressed, the following is displayed: 

ENTER TAPE FILE NUMBER TO BE COPIED FROM 



ENTER DISKETTE FILE NUMBER TO BE COPIED TO 



Enter the number of the tape file you want to copy from. The file number can 
be up to four numeric digits. Enter the number of the diskette file you want to 
copy to. The file number can be up to four numeric digits. After the EXECUTE 
key is pressed, the copy operation begins. When the copy operation is 
completed, the following is displayed: 

COPY COMPLETED 

OPTIONS ARE: 

1 , RESTART FUNCTION 

2. RETURN TO SYSTEM 

S E L E C T P T 1 N , P R E S S E X E C U T E 



Hints 



• Before trying to copy a tape file, check the file type and make sure that file 
type can be copied. 

• When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

• When entering a file name for the output file, make sure the name conforms 
to the rules for simple or complex names. 

• Do not use a format 9 (1024-byte sector) diskette. 

. Make sure the diskette output file: 

- Is marked 

- Is not write- protected 

- Does not contain valuable data 

- Is large enough to contain all the data on the input file 
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FILE TYPES COPIED 

Not all file types can be copied with the tape -to -diskette copy function. 
Attempting to copy some types of files causes an error. The following chart 
summarizes the tape files that can be copied. 



Tape File 










Diskette 


Type 


System 


File Name 


Copied 


Error 


File Type 





3 


Marked and unused 


No 


357 




1 


1 


General exchange 
file 


Yes 




2 


2 


3 


General exchange 
file or BASIC source 


Yes 




2 


3 


1 


BASIC source file 


Yes 




2 


4 


1 


BASIC work area file 


No 


358 




5 


1 


BASIC KEYS file 


No 


358 




6 


1 


APL continue file 


No 


359 




7 


3 


APL save file 


Yes 




7 


8 


3 


APL internal data 


Yes 




8 


9 


2 


Record I/O file 


Yes 




9 


11 


2 


BASIC save file 


Yes 




11 


12 


2 


BASIC KEYS file 


Yes 




12 


16 


1 


Patch, tape recovery, 
and tape copy file 


No 


361 




17 


1 


Diagnostic file 


No 


361 




18 


1 


Communication file 


No 


361 




19 


1 


IMF file 


No 


361 




21 


2 


Function file 


Yes 




21 


22 


2 


Feature file 


Yes 




22 


23 


2 


IMF file 


Yes 




23 


24 


2 


Diagnostic file 


Yes 




24 


26 


2 


APL continued file 


No 


359 





System 

1 =5100 

2 = 5110 

3 = 5100 and 51 10 
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Chapter 6. Diskette-to-Tape Copy 



Diskette-to-tape copy and the tape-to-diskette copy are the same function. 
The tape-to-diskette copy is explained in Chapter 5. A chart at the end of this 
chapter shows the file types that can be copied. The file name of the diskette 
input file is assigned to the output tape file. The output media must be 
marked before the copy operation is started. 



OPERATION 



Diskette-to-tape copy is loaded via the link command and is on file 4 on the 
IBM-supplied tape cartridge or diskette. The file name is TDTCOPY. After the 
function is loaded, the following is displayed: 

TAPE TO DISKETTE, DISKETTE TO TAPE COPY FUNCTION 



OPTIONS ARE: 

I . TAPE TO DISKETTE COPY. 
2, DISKETTE TO TAPE COPY, 

E N T E R P T ION, P R E S S E X E C U T E . 



Enter a 2 to select the diskette-to-tape copy. After the EXECUTE key is 
pressed, the following is displayed: 

INSERT TAPE INTO TAPE DRIVE YOU WILL BE USING 
E N T E R D R I V E N U M B E R > P R E S S E X E C U T E 



INSERT DISKETTE INTO DISKETTE DRIVE YOU WILL BE USING 
ENTER DRIVE NUMBER, PRESS EXECUTE 
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Enter a 1 or 2 to select the tape drive you are using for the output file. Enter, a 
1 , 2, 3, or 4 to select the diskette drive you are using for the input file. After 
the EXECUTE key is pressed, the following is displayed: 

ENTER DISKETTE FILE NUMBER TO $E COPIED FROM 



ENTER TAPE FILE NUMBER TO BE COPIED TO 



Enter the number of the diskette file you want to copy from. The file number 
can be up to four numeric digits. Enter the number of the tape file you want to 
copy to. The file number can be up to four numeric digits. After the EXECUTE 
key is pressed, the copy operation begins. When the copy operation is 
completed, the following is displayed: 

COPY COMPLETED 

OPTIONS ARE: 

1 . RESTART FUNCTION 
2. RETURN TO SYSTEM 

S E L E C T P T 1 N , P R E S S E X E C U T E 



Hints 



Before trying to copy a diskette file, check the file type and make sure that 
file type can be copied. 

When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

Make sure the tape output file: 

- Is marked 

- Does not contain valuable data 

- Is large enough to contain all the data on the input file 
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FILE TYPES COPIED 

Not all file types can be copied with the diskette-to-tape copy. Attempting to 
copy some file types causes an error. The following chart summarizes diskette 
files that can be copied. 



Diskette 








Tape 


File Type 


File 


Copied 


Error 


File Type 





Marked and 
unused 


No 


366 




2 


General 
exchange file 


Yes 




2 


7 


APL save file 


Yes 




7 


8 


APL internal 
data 


Yes 




8 


9 


Record I/O 
file 


Yes 




9 


B9 


Basic 
exchange 


Yes 




9 


10 


APL internal 
data 


No 


365 




11 


BASIC save 
file 


Yes 




11 


12 


BASIC KEYS 
file 


Yes 




12 


15 


APL mixed 
record file 


No 


370 




21 


Function file 


Yes 




21 


22 


Feature file 


Yes 




22 


23 


IMF file 


Yes 




23 


24 


Diagnostic 
file 


Yes 




24 


26 


APL continue 
file 


No 


364 
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Chapter 7. Tape-to-Tape Copy 



The tape-to-tape copy functions copies an entire input tape to an output tape 
or copies a selected single input file to an output file. When the entire tape is 
copied, the function marks the output tape exactly the same as the input tape 
was marked. When a single file is copied, you must mark the output file 
before the copy operation is started. 



OPERATION 



The tape-to-tape copy function is loaded via the link command and is on file 5 
on the IBM -supplied tape cartridge or diskette. The file name is TTCOPY. 
After the function is loaded, the following is displayed: 

TAPE TO TAPE COPY FUNCTION 



S E i... E T D E S I R E D C P Y P T 1 N 

OPTIONS ARE: 

:l. . COPY ONE FILE 
2. COPY ALL FILES 

S E L E C T P T 1 N , P R E S S E X E C U T E 

Enter a 2 to copy the entire input tape to the output tape. Enter a 1 to copy a 
single selected input file to an output file. When you select a single file to be 
copied, the following is displayed: 

HOW MANY TAPE DRIVES WILL YOU BE US I NO 
OPTIONS ARE: 

1 . ONE TAPE DRIVE 

2, TWO TAPE DRIVES 

S E L E C T P T 1 N , P R E S S E X E U T E 
Enter a 1 or 2 to select the number of the tape drives. 

One-Tape-Drive Copy 

If you select the one-tape-drive option, the following is displayed: 

INSERT TAPE BE I NO COPIED FROM 

INTO SELECTED TAPE DRIVE 

ENTER DRIVE NUMBER, PRESS EXECUTE 
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Enter a 1 to select tape drive 1 (built-in) or a 2 to select tape drive 2 
(auxiliary). Then insert the tape cartridge used for input into that drive, and 
press the EXECUTE key. 

If you are copying a single file, the following is displayed: 
ENTER FILE NUMBER TO BE COPIEB FROM 

ENTER FILE NUMBER TO BE COPIED TO 



Enter the file number you want to use. The file number can be up to three 
numeric digits. 

On a one-drive copy, the function reads data from the input tape file into the 
system's read /write storage. When the read /write storage is filled or all the 
data is read from the input tape, the following is displayed: 

INSERT TAPE BE I NO COPIED TO 

p r e s s i;;: x e c u t e t o c o n t i n u e 

You should now remove the tape cartridge used for input from the drive. Then 
insert the tape cartridge to be used for output and press the EXECUTE key. If 
the input tape file and the output tape file are on the same tape cartridge, just 
press the EXECUTE key. The data in read /write storage is then written to the 
output tape file, and, if more data exists on the input tape file, the following is 
displayed: 

INSERT TAPE BE I NO COPIED FROM 
PRESS EXECUTE TO CONTINUE 

You should now remove the tape cartridge used for output from the drive. 
Then insert the tape cartridge used for input and press the EXECUTE key. If 
the output tape file and the input tape file are on the same tape cartridge, just 
press the EXECUTE key. The function then reads the input file into read /write 
storage. 

This procedure (reading, changing tape cartridge, writing, and changing tape 
cartridge again) continues until all data is copied. When the copy is completed, 
the following is displayed: 

TAPE COPY COMPLETED 

OPTIONS ARE: 

1 , R E S T A R T C P Y F U N C T 1 N 
2, RETURN TO THE SYSTEM 

E N T E R P T 1 N , P R E S S E X E C U T E 
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Two-Tape-Drive Copy 

If you selected the two-tape-drive option, the following is displayed: 

insert tape;: being copied from 
i n t 8 e !.., e c t e d t a p e d r i v e 

ENTER DRIVE NUMBER, PRESS EXECUTE 



INSERT TAPE BEING COPIED TO 
INTO SELECTED TAPE DRIVE 

E N T E R D R I V E NUMB E R , P R E S S E X E C U T Ei 



Enter the number of the tape drives you want to use for input and output. 
Enter a 1 for tape drive 1 (built-in) or a 2 for tape drive 2 (auxiliary). If you 
enter the same tape drive number for the input tape drive and the output tape 
drive, the function defaults to a one-drive option. 

If you are copying a single file, the following is displayed: 

ENTER FILE NUMBER TO BE COPIED FROM 

ENTER FILE NUMBER TO BE COPIED TO 



Enter the file number you want to use. The file number can be up to three 
numeric digits. 

When the copy operation is completed, the following is displayed: 

TAPE COPY COMPLETED 
OPTIONS ARE: 

1 . RESTART COPY FUNCTION 

2, RETURN TO THE SYSTEM 

E N T E R P T 1 N , P R E S S E X E U T E 
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Hints 



When entering a file number, you can start the number in any position. Up 
to four digits may be entered for the file number. 

On a file-to-file copy, the output file must be marked. If the output file 
contains data, an error message is displayed. 

On a file-to-file copy, make sure the output file is large enough to contain 
all the data from the input file. 

Make sure the file you are copying to does not contain valuable data. 

When a complete tape is copied, an error message is displayed if file 
number 1 is marked. If you continue when this error occurs, the output tape 
is re- marked and the orginal data on the tape is lost. 

Make sure the correct tape cartridge is in the drive you specify for input and 
output. 
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Chapter 8. Diskette Compress 



As a result of the marking, dropping, freeing, and re-marking of files, unused 
sectors can exist between extents for files. The function of diskette compress 
is to place all unused sectors into one area. To do this, the function rewrites 
all files on the diskette as close to cylinder (beginning of the diskette) as 
possible. The first file on the diskette that has unused space before it is 
rewritten starting at the end of the preceding file or at the end of the label 
area. The next file is then rewritten starting at the end of the first file that was 
rewritten. This continues until all files on the diskette are moved ahead as 
close to the preceding file as possible. Any unused space that existed 
between files is removed. This space now exists at the end of the diskette and 
can be used for additional files. 

Note: Diskette compression is performed automatically when 
diskette-to-diskette copy is used to copy an entire diskette. 



OPERATION 



Diskette compress is loaded by the link command and is on file 6 on the 
IBM-supplied tape cartridge or diskette. The file name is COMPRESS. After 
the function is loaded, the following is displayed: 

this :i:b the;: compress FUNCTION 



PRESS EXECUTE TO CONTINUE 

After the EXECUTE key is pressed, the following is displayed: 

SELECT DRIVE YOU WILL BE US I NO 

1*2,3 R '■!• 

LOAD DISKETTE AND PRESS EXECUTE 
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Enter a 1, 2, 3, or 4 to select the diskette drive you will be using. Insert the 
diskette you want to compress in that drive, then press the EXECUTE key. The 
function now moves all the files. After all files have been successfully moved, 
the following is displayed: 

compress complete;: 

OPTIONS ARE: 

1 . RESTART FUNCTION 
2. RETURN TO SYSTEM 

ENTER OPTION NUMBER AND PRESS EXECUTE 



Hints 



A diskette read or write error can prevent successful completion of the 
compress function and could make the file that had the error unusable. 
After the error occurs, a message is displayed indicating whether the data 
has been restored to its original address. 

The files on a format 9 (1024-byte sector) diskette cannot be compressed. 

The diskette-to-diskette copy function also compresses the output diskette. 

When a header label error occurs, an attempt is made to restore the data 
back to the original location. A message is displayed indicating whether the 
data was restored. However, the data in the file is not usable because of 
the header. The diskette recovery function can be used to correct the 
header and thus recover the data in the file. 
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Chapter 9. Label Display 



The label display function displays the diskette volume label, diskette ERMAP 
(error map) label, or diskette and tape file header labels. The contents of these 
labels are displayed and can also be printed. 

A current record of the label information is helpful if a read error occurs on the 
diskette or tape label. The diskette and tape recovery functions request 
information to construct a new label. All the information requested by the 
recovery functions is available from the label display function output. 

Labels on any diskette that is access -protected cannot be displayed. 



OPERATION 



The label display function is loaded by the link command and is on file 7 on 
the IBM -supplied tape cartridge or diskette. The file name is LDISPLAY. 

After the function is loaded, the following is displayed: 

SYSTEM LABEL DISPLAY OPTIONS ARE: 

1 . DISPLAY FROM TAPE 

2. DISPLAY FROM DISKETTE 

3. RETURN TO SYSTEM 

ENTER OPTION NUMBER. PRESS EXECUTE 



Enter a 1 to display tape labels, a 2 to display diskette labels, or a 3 to cancel 
the function and return to the language. The abbreviations used in the label 
displays and printouts are shown later in this chapter. 



Display Tape Labels 

The following is displayed when the display tape labels option is selected: 

TAPE LABEL DISPLAY OPTIONS ARE: 

1 . D I S P L AY T A P !;• H E A D E R L A B E L < S ) 

2. DISPLAY FROM DISKETTE 

3, RETURN TO SYSTEM 

ENTER OPTION NUMBER, PRESS EXECUTE 
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Enter a 1 to display tape header labels, a 2 if you want to go back and display 
diskette labels, or a 3 to return to the system. When a 1 is entered, the 
following is displayed: 

DISPLAY TAPE HEADER LABEL (S) 

E N T E R D I S P L AY 8 T A T E M E N T D , P •• ** tt ** •• tt ** ** 

D D R 3: V E NUMB E R < 1 OR 2 ) , 

p p R I N T L A B E L ? < ■« N , 1 :::: Y E 8 .. R 2 •- A U T ) , 

U F I L E RANG E : F I R 8 T F I L E , L A S T F I L E 

OR ENTER TO STOP 
AND THEN PRESS EXECUTE 

The first parameter selects the tape drive. Enter a 1 to select tape drive 1 
(built-in) or a 2 to select tape drive 2 (auxiliary). 

The next parameter specifies whether you want the labels printed or just 
displayed. Enter a to display the labels. Enter a 1 or 2 to print the labels on 
the printer. When a 1 is entered, the function stops after each label is printed; 
you must press the EXECUTE key to have the next label printed. When 2 is 
specified, the function does not stop until all labels are printed. Pressing the 
ATTN key causes the printing to stop. 

The next two parameters specify the beginning and ending file numbers. The 
file numbers can be up to three digits. Only the beginning (FIRST FILE) file 
number need be entered if only one label is to be displayed. 

A comma must be entered between the parameters. After all the parameters 
are entered and the EXECUTE key is pressed, the labels on the tape in the 
selected tape drive are displayed and printed if print is specified. 



Display Diskette Labels 

The following is displayed when the display diskette labels option is selected: 

DISKETTE LABEL DISPLAY OPTIONS ARE: 

1 , DISPLAY ERMAP LABEL 

2, DISPLAY VOLUME LABEL 

3, DISPLAY DISKETTE HEADER LABEL (S) 
M-. DISPLAY FROM TAPE 

5. RETURN TO SYSTEM 

ENTER OPTION NUMBER, PRESS EXECUTE 



Enter a 1, 2, or 3 to select the type of diskette labels you want displayed. 
Enter 4 if you want to display a tape label, or a 5 to return to the system. 
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Display ERMAP Label 

The following is displayed when the display ERMAP label option is selected: 

DISPLAY ERMAP LABEL 

E N "I" E R D I S P L AYS T A T E M E- N T D .. P 

D D R :i: V E NUMB E R < .1. , 2 , Z, R '■!• ) > 

P PRINT LABEL? <0==NO OR I^YES) 

OR ENTER TO STOP 
AND THEN PRESS EXECUTE 



Enter the diskette drive number followed by a comma. Enter a if the label is 
to be displayed, or a 1 if the label is to be printed. When the EXECUTE key is 
pressed, the ERMAP label on the diskette in the selected diskette drive is 
displayed and printed if print is specified. 



Display Volume Label 

The following is displayed when the display volume label option is selected: 

DISPLAY VOLUME LABEL 

E N T E R D I S P L A Y S T A T E M E- N T D , P 

D DRIVE NUMBER ( :l. , 2, 3, OR M- > , 

P PRINT LABEL? (0==NO OR I^YES) 

OR ENTER TO STOP 
AND THEN PRESS EXECUTE 

Enter the diskette drive number followed by a comma and a if the label is 
just displayed, or a 1 if the label is to be printed. When the EXECUTE key is 
pressed, the volume label on the diskette in the selected diskette drive is 
displayed and printed. 

Display Diskette Header Labels 

The following is displayed when the display diskette header labels option is 
selected: 

D I S P L AY D I S !< E T T E H E A D E R L A B E L < S ) 

E N T E R D I S P L A Y S T A T E M E N T D > P > tt ** » It , tf ** ** tt 

D D R I V E N U M B E R (1, 2< 3< OR ^, 

P P R I N T L A B E L ? ( ~= N , 1 ■■■■■■ Y E S , R 2 ■■■■■■ A U T ) 

** F I L E RAN G E : F I R S T F 1 1... E , !... A S T ! :: ' I L E 

OR ENTER TO STOP 
AND THEN PRESS EXECUTE 
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The first parameter selects the diskette drive. The next parameter specifies 
whether you want the labels printed or displayed. Enter a to display the 
labels. Enter a 1 or 2 to print the labels on the printer. When a 1 is entered, 
the function stops after each label is printed; you must press the EXECUTE key 
to have the next label printed. When 2 is specified, the function does not stop 
until all labels are printed. Pressing the ATTN key causes the printing to stop. 

The next two parameters specify the beginning and ending file numbers. The 
file numbers can have up to four digits. Only the beginning (FIRST FILE) file 
number need be entered if only one label is to be displayed. 

A comma must be entered between the parameters. After all the parameters 
are entered and the EXECUTE key is pressed, the labels on the diskette in the 
selected drive are displayed and printed if print is specified. 



DISPLAY FORMAT 

The IBM Diskette General Information Manual, GA21-9182, provides detailed 
information on each of the fields in the diskette ERMAP label, volume label, 
and file header label. The following is a list of abbreviations used for the 
displays and printouts. 

Abbreviation Meaning 

FLDNAME Name of the field in the label 

P Position of the field in the label 

LNTH Length of the field in bytes 

CONTENTS Contents of the field 



ERMAP Label 

The ERMAP label contains information about the number and location of any 
defective cylinders on the diskette. The following is a list of abbreviations used 
for the ERMAP label. 

Abbreviation Meaning 

LABLID Label identifier (ERMAP) 

DEFCYL No defective cylinder indicator 

or first defective cylinder number 
DEFCYL No second defective cylinder indicator 

or second defective cylinder number 
DEFECT Diskette defect indicator 

DRTIND Error directory indicator 

ERRDRT Error directory 
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Volume Label 



The volume label contains information about the format of the diskette. The 

following is a list of abbreviations used for the volume label. 

Abbreviation Meaning 

LABLID Label identifier and label number (VOL1) 

VOLID Volume identifier 

ACCESS Accessibility 

SYSID System identification 

OWNRID Owner identification 

LBLXTN Label extension indicator 

VOLSRF Volume surface indicator 

XTNTAR Extent arrangement indicator 

SPLREQ Special requirements indicator 

PHYRLN Physical record length of available space 

PHYRSQ Physical record sequence code 

LBLSTD Label standard version 



Diskette File Header Label 

The diskette file header label defines the contents and format of the associated 
diskette file. The following is a list of abbreviations used for the diskette file 
header label. 



Abbreviation 


Meaning 


LABLID 


Label identifier and label number (HDR1 


FILEID 


Data set identifier 


BLKLNG 


Block length 


RCDATT 


Record attribute 


BOE 


Beginning of extent 


PHYRLN 


Physical record length 


EOE 


End of extent 


RBLKFT 


Record block format 


BYPASS 


Bypass indicator 


DSSRTY 


Data set security 


WRTPRT 


Write- protect indicator 


XCHGTP 


Exchange type indicator 


MLTVOL 


Multivolume data set indicator 


VOLSOJ 


Volume sequence number 


CRDATE 


Creation date 


RCDLNG 


Record length 


OFFSET 


Offset to next record space 


EXDATE 


Expiration date 


VFYCPY 


Verify/copy indicator 


DSORG 


Data set indicator 


EOD 


End-of-data address 


SYSCOD 


System code 


FILTYP 


File application type 
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Tape File Header Label 

The tape file header label defines the contents and format of the tape file. The 
following is a list of abbreviations used for the tape file header label. 

Abbreviation Meaning 

FILTYP File type 

FILE# File number 

FLSZKB File size in K-bytes 

SEQREL Sequential relocate indicator 

EOD End of data 

FILEID File identification 

BASTMT First and last BASIC statement number 

BASKEY BASIC keys 

APLMSP APL read /write storage starting address 

APLWS1 Length of the first half of the user's workspace 

APLSVI SVI starting address 

APLWS2 Length of the second half of the user's workspace 

APLMSZ Machine size 

APLMXL Maximum logical record length 

APLMX# Maximum logical record number in the file 
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Chapter 10. Diskette Recovery 



The diskette recovery function allows you to read a file when a read error 
occurs on the volume label (errors 015, 024, 025), header label (errors 015, 
038), or data portion (error 01 7) of the file. The function saves as much of the 
data on the file as possible. The function can be used to recover data from the 
following file types: 

02 General exchange 

08 APL internal data 

09 Record I/O 

The diskette recovery function can be used on labels for all file types. 

Note; To ensure a successful recovery from a read error on a label, you should 
have a current record of the output from the label display function (see Chapter 
9). This record provides the information needed to reconstruct the label. You 
should also make sure you have room for one more header label on the 
diskette. 



OPERATION 



The diskette recovery function is loaded by the link command and is on file 8 
on the IBM -supplied tape cartridge and diskette. The file name is DRECOVER. 
After the function is loaded, the following is displayed: 

DISKETTE RECOVERY FUNCTION 
OPTIONS ARE: 

1 , VOLUME LABEL RECOVERY 

2, HEADER LABEL RECOVERY 

3, DATA FILE RECOVERY 

ENTER OPTION NUMBER AND PRESS EXECUTE 



After the option is selected, the following is displayed: 

ENTER DRIVE NUMBER 

INSERT DISKETTE INTO SELECTED DRIVE 

PRESS EXECUTE 
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After the diskette drive number is entered and if option 2 or 3 was selected, 
the following is displayed: 

ENTER FILE NUMBER 
PRESS EXECUTE 



After the file number is entered, the function begins the recovery procedure. 



Volume Label Recovery 

The function attempts to read and check the volume label. If the label is found 
to be error free, an error message is displayed. If an error is found, the 
function requests the following information to create a new volume label: 

• Label area extended indicator (valid entries are blank, 1 -9) (LBLXTN) 

• Volume surface indicator (valid entries are 1, 2, or 2D) (VOLSRF) 

• Length of physical record (valid entries are blank for 1 28, 1 for 256, or 2 for 
512) (PHYRLN) 

• Physical record sequence (valid entries are blank, 1-13) (PHYRSQ) 

The function uses default values for the other fields in the label. The new label 
is then written on the diskette. If the new label cannot be written without 
error, an error message is displayed. If the new label is written without error, 
the recovery is complete. 

You can check if the volume label you created contains valid data. To do this, 
perform the volume label recovery option again. If error code 278 occurs, the 
label contains valid data. If the function requests information to create a new 
volume label, the information you supplied for the first volume label was not 
valid. 

If recovery was successful, you should copy the data from the diskette that 
had the error to another diskette. Then initialize the diskette that had the error. 
If an error occurs on the initialize function, the diskette should not be used. 
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Header Label Recovery 

The function attempts to read the header label. If the label can be read, an 
error message is displayed. If an error is found, the function requests the 
following information to create a new header label: 

Block length (BLKLNG) 

Record attribute (RCDATT) 

Beginning of extent (BOE) 

End of extent (EOE) 

Exchange type indicator (XCHGTP) 

Record length (RCDLNG) 

Offset to the next record (OFFSET) 

Data set organization indicator (DSORG) 

End of data (EOD) 

File type (FILTYP) 

The function then tries to write the new label over the label causing the error. 
If the label can be written without error, recovery is complete. If an error 
occurs, the function requests a file number to write the new label. The 
function then writes the new label at the new location. 

You can check if the header label you created contains valid data. To do this, 
perform the header recovery option again. If error code 284 occurs, the label 
contains valid data. If the function requests information to create a new header 
label, the information you supplied for the first header label was not valid. 

When recovery is complete, you should copy the data from the diskette that 
had the error to another diskette. Then initialize the diskette that had the error. 
If an error occurs on the initialize function, the diskette should not be used. 
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Data File Recovery 

This function reads the file until the sector that caused the error is found. The 
function then deletes the sector or writes blanks in the sector. Since the sector 
can contain data from more than one record, all records (in preceding and 
following sectors) with data in the sector with the error is lost. 

If the function is successful in writing over the error, the recovery is complete. 
If an error occurs when the function is recovering data from a type 2 or 8 file, 
an error message is displayed. If an error occurs when the function is 
recovering data from a type 9 file, the following is displayed: 

OPTIONS: 

:i. , RESTART FUNCTION 

2. RETURN TO SYSTEM 

3. CONTINUE WITH FUNCTION 

ENTER OPTION NUMBER AND PRESS EXECUTE 
RECOVERY ERROR 293 



When option 3 is selected, the file is copied to another file. You can select a 
file to which the file that caused the error will be copied. The two files may be 
on the same diskette or different diskettes. This copy is similar to the 
diskette-to-diskette copy described in this manual. The function issues 
prompting messages to assist you in doing the copy. 

When recovery is complete, you should copy the data from the diskette with 
the error to another diskette. Then initialize the diskette that had the error. If 
an error occurs on the initialize function, the diskette should not be used. 
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Chapter 11. Tape Data Recovery 



The tape data recovery function is used to read a file when a read error occurs. 
The function saves as much of the data in the file as possible. The function 
works on the following file types: 

01 General exchange 

02 General exchange or BASIC source 

03 BASIC source 
08 APL internal data 



OPERATION 



The tape data recovery function is loaded by the link command and is on file 9 
on the IBM-supplied tape cartridge or diskette. The file name is TRECOVER. 

After the function is loaded, the following is displayed: 

TAPE' DATA RECOVERY FUNCTION 
ENTER DRIVE NUMBER 

Enter a 1 to select tape drive 1 (built-in) or enter a 2 to select tape drive 2 
(auxiliary). Press the EXECUTE key. The following is then displayed: 

DATA IS RECOVERED FROM FILES HAVING TAPE READ ERROR! 
FILE TYPES 01/ 02/ 03/ AND 08 CAN BE PROCESSED, 

LOAD CARTRIDGE WITH READ ERRORS IN TAPE UNIT, 

ENTER FILE NUMBER (UP TO 3 DIGITS) AND PRESS EXECUTI 

Insert the tape with the read errors in the selected drive. Enter the file number 
of the file with the errors. Up to three digits can be entered for the file 
number. 
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The recovery function reads the file until the record that caused the read error 
is found. The function then writes blanks in the logical record with the error. 
If the record cannot be written back without error, all the data in the physical 
tape record (512 bytes) will be lost. Because the physical tape record may 
contain part of logical records from the preceding and following physical 
records, these logical records are lost also. For example: 

Physical 

1 9 3 
Record ] . z . J 
1 . ! ! , J , 

Logical 1 2 3 4 5 

Record Error occurs here. 

Correcting the error in logical record 3 will cause logical records 2, 3, and 4 to 
be lost. 
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Chapter 12. Tape Header Recovery 



The tape header recovery function is used to recover the data from a file when 
an error occurs while the header label is being read. The header label contains 
information that defines the file. The function works on headers for all files. 

Note: To ensure a successful recovery from a read error on a header label, you 
should have a current record of the output from the label display (see Chapter 
9). This record provides the information needed to reconstruct the tape header 
label. 



OPERATION 



The tape header recovery function is loaded by the link command and is on file 
10 on the IBM-supplied tape cartridge or diskette. The file name is 
HRECOVER. After the function is loaded, the following is displayed: 

T A P E H E A D E R R E C V E R Y !"' U N C T 1 N 

INSERT TAPE WITH HEADER CRC ERROR INTO SELECTED DRIVE 

ENTER DRIVE NUMBER 

PRESS EXECUTE 



Insert the tape with the read errors in a tape unit. Enter a 1 to use tape drive 
1 (built-in) or enter a 2 to use tape drive 2 (auxiliary). 

The recovery function reads the tape until the header that caused the read 
error is found. The function then requests the following information to create a 
new header: 

- File type (FILTYP) 

- File size in K-bytes (FLSZKB) 

- Sequential relocate indicator (SEQREL) 

- End of data (EOD) 

- First and last BASIC statement number (BASTMT) 

- BASIC keys (BASKEY) 

- APL read /write storage starting address (APLMSP) 

- Length of the first half of the user's workspace (APLSV1 ) 

- SVI starting address (APLSVI) 

- Length of the second half of the user's workspace (APLSV2) 

- Machine size (APLMSZ) 

- Maximum logical record length (APLMXL) 

- Maximum logical record number in the file (APLMX#) 
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The function then tries to write the new header over the header that caused 
the read error. If successful, the recovery is complete. If an error occurs, a 
message is displayed. This message gives you the option of copying the files 
from the tape with the read error to a different tape. 

If you select the copy option, the function issues prompting messages to aid 
you in doing the copy. The file with the read error and all following files are 
copied to the other tape. The output tape is marked during the copy operation 
starting at the file copied to. For example, if a tape had 6 files and file 4 had d 
bad header, files 4, 5, and 6 would be copied. These three files could be 
added to another tape that already had 10 files. Files 11, 12, and 13 on the 
output tape would be marked as the data was being copied to the tape. 
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Chapter 13. Diskette Sort Feature 



The Diskette Sort feature is optional on the IBM 5110. This feature allows you 
to change the order of the records in a file by doing a record sort or an 
address out sort. (The Diskette Sort feature is also referred to as sort.) 

The record sort option creates a new file with the records in the sorted order. 
The address out option of the sort creates a file that contains the address of 
the records in the sorted order. The sort operates faster when an address out 
file is used because it does not have to write all of the records on the output 
file. Also, a smaller file can be used for output because the file contains only 
the addresses and not the data. 

The Diskette Sort feature does not have to be loaded from tape or diskette 
before it is used. To execute sort use the )SORT (for APL) or UTIL SORT (for 
BASIC) command. You can also execute sort by using the procedure file from 
APL or BASIC. The use of the procedure file is discussed later in this chapter. 

The remaining information on sort is divided into the following main topics: 

Introduction to Gives an overview of why 
sort you would want to sort 



Files 



Defines the characteristics 
of the files used by the 
sort program 



Statements Gives the syntax and a 

definition of each of the 
statements used by the sort 
program 

Operation Explains how to use the 

sort program and shows the 
displayed messages 

Additional Discusses performance considerations 

Information and programs to determine work file size 
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INTRODUCTION TO SORT 

The following is an example of how you could use the sort program to prepare 
a report. The files and the report are described first. The actual sort 
statements are shown when the sort statements are discussed. 

For this example, assume that you have a file, named MASTER, that contains a 
record for each of your customers. Each record has the customer number and 
name, the sales representative, the year-to-date (YTD) sales, and other 
information about the customer. The customer number has six digits. The first 
four are the customer identifier, and the last two are the sales territory 
associated with the customer. Assigning the customer numbers this way 
allows you to summarize your sales by territory easily. This file could have 
been created by an APL or BASIC program and would look like this if it were 
formatted and printed: 



Customer 


YTD 




Sales 




Number 


Sales 




Rep 


Customer Name 


:i.3 3:1. o:l. 


90 





CLAIR 


SMITH LUMBER WEST 


133102 


830 





MEL 


SMITH LUMBER EAST 


231101 


90 





CLAIR 


R AND D PUMPS 


287502 


60 





DON 


DANS FLOWERS 


30 3802 


950 





DON 


SAMS BOOKS 


369101 


170 





MARTY 


NORTH WOOD BOATS 


1+07101 


1 





CLAIR 


NORTHLAND CARS 


"+57101 


1 n n o 





CLAIR 


!< AND l< WHOLESALE 


508702 


-• 10 





DON 


SUNSHINE FLOORS 


550101 


2 





MARTY 


DONS WORLD 



Positions 1 through 4 are the customer identifier; positions 5 and 6 are the 
sales territory. Position 7 is the sign position for the YTD sales in positions 8 
through 14. The sales representative is in positions 15 through 19. The 
customer name is in positions 20 through 36. Positions 37 through 128 are 
used for additional information. There are 1000 records in the file. The file is 
file 1 on a diskette in drive 1 and is named MASTER. 
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As you can see, the file is in ascending order by customer number. Now 
assume you want to print a report that shows by territory and sales 
representative the YTD sales for each customer. You want the customers 
within each group to appear in descending order of YTD sales on the report. 
The sort program allows you to use up to six different fields to determine the 
order of the records. Such a report could look like this: 

Sales YTD Customer 

Terr Rep Sales Number Customer Name 

0:1. CLAIR 100 0.0 1+57101 !< AND K WHOLESALE 

90 0.00 133101 S M I T H L U M B E R W E S T 

900. 00 231101 R AND D PUMPS 

10 0.00 i+ 7 1 01 N R T H L AND C A R S 

1 M A R T Y 2 . 5 5 .1. 1 D N S W R L D 

1700.00 369101 NORTHWDOD BOATS 

02 DON 950.00 303802 SAMS BOOKS 

60 0.0 287502 DANS FLOWERS 
• - 1 0.00 5 8 702 S U N S H I N E E L R S 

02 MEL 830.00 133102 SMITH LUMBER EAST 



The first column of the report shows the territory. The next column is the sales 
representative. The next three columns show the YTD sales, customer 
numbers, and customer name in order by the YTD sales. The highest YTD 
sales for each sales representative is shown first. 

You must write an APL or BASIC program to print this report. But first you 
must sort the file to get the records in the order they are to appear on the 
report. The sorted file is named SALES. The examples used in this chapter 
deal with sorting the MASTER file to get the SALES file. The following shows 
the order of the records in the SALES file: 

Customer YTD Sales 

Number Sales Rep Customer Name 

'+57 1 1 10 0.00 CL A I R K AND K WHOLESALE 

133101 900.00 CLAIR SMITH LUMBER WERT 
231101 900.00 CLAIR R AND D PUMPS 

'+ 7 1 1 10 0.00 CL A I R NORTHLAND CARS 

550101 2000.00 MARTY DONS WORLD 

369101 1700.00 MARTY NORTHWOOD BOATS 

303802 950.00 DON SAMS BOOKS 

287502 600.00 DON DANS FLOWERS 

508702 - 100.00 DON SUNSHINE FLOORS 

133102 830.00 MEL SMITH LUMBER EAST 
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FILES 



The sort program uses an input, output, and, for some sort jobs, a work file. 
All files must be diskette files. The program reads the records from the input 
file. The sort fields (fields of the record that are used to determine the order of 
the records) and the location of the record in the input file (addresses) are 
called keys. The keys are stored in the system. The sort program uses the 
same area of the system that APL uses for its workspace or that BASIC uses 
for its work area to store the keys. This part of the system is called the read 
and write storage (R/W storage). 

When a large input file is sorted, more space may be required to store the 
keys than is available in R/W storage. The work file is used to provide the 
additional space. 

The sort program fills R/W storage with keys, and the keys are sorted. The 
sorted keys are then written on the work file. The sort program reads the 
complete input file in this manner. After all input records are read, the program 
does a final sort on all the keys. 

In the standard sort, the program uses the sorted keys to read the input file 
again. This time the records are read from the input file and are written to the 
output file. Thus the input file remains in the original order, and the output file 
is in the sorted order. 



Master 














Sales 


i n , 




Sort Utility 

and 
R/W Storage 




m i 


O 

1 


O 
1 








i 


, 




Input 
File 




■ 


i 




Output 
File 




O 

1 


Work File 





If an address out sort is specified, the program uses the sorted keys to write 
the location of the input record to the output file. Thus the output fife (address 
out file) contains a 4- byte binary logical record number (relative record number) 
for each of the records in the input file. 

You can then read the relative record numbers from the address out file and 
use them to directly access records from the input file. 
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For example: 



Relative Record Number 



Master File 
1 




Master file remains 
n the original order. 



4 


1 


5 


3 


2 



Sorted relative record 
numbers can be used to 
access the master file 
in ascending order. 



The following statements might be used in a program to access a file in order 
using the record numbers in the address out file; 



30 


OPEN 


FILE 


FLI , 'DBO M, 'NAMES' , ALL 


OOi+O 


OPEN 


FILE- 


FI...2, 'DBO ' ,2, 'ADDBDRT' , IN 


050 


READ 


FILE 


USING 060, FL2,R 


06 


FORM 


DM- 




070 


READ 


FILE 


FLI, RE OR, A* 
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Input File 



The input file must be a record I/O (type 9) data file created on the IBM 51 10. 
Record I/O data files created on other devices may be used if the 
characteristics are the same as those of the 5110 files. If the characteristics 
are not correct, one of the following error codes will result: 

Error Meaning 

336 The block length for a blocked-spanned 
file does not equal the sector size. 

342 A muttivolume file cannot be used. 



344 The input file exchange type is not supported. 

345 A variable- length logical record cannot be used. 

355 The diskette file expiration date is not blank. 

All diskette formats except format 9 (1024- byte sectors) can be used for this 
file. The file can have either sequential or random organization. The records 
can be any valid length and can be blocked-spanned or unblocked- unspanned. 

In an unblocked- unspanned file, one record is written on each sector. The 
records cannot be longer than the size of the sectors. If they are shorter, the 
additional space in the sector is unused. 



Space Not Used in the Sector. 

J- 



100-Byte Record 



28 Bytes 



100-Byte Record 



28 Bytes 



100-Byte Record 28 Bytes 



7~~ 

128-Byte Sectors 



For a blocked-spanned file, the records span the limits of the sectors. For 
example, if you have a sector size of 128 bytes and a record size of 100 bytes, 
the first record and 28 bytes of the second record are written on the first 
sector of the file. 



100-Byte Record 



100-Byte Record 100-Byte Record 



=F 



128-Byte Sectors 



X" 
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Output File 



The file used as an output file by the sort program must be a marked, unused 
file. When you are using blocked-spanned input files: 

• After a standard sort is completed, the output file has the same 
organization, logical record length, and record format as the input file. 

• After an address out sort is completed, the output file has a 
blocked -spanned format with a record length of four. 

When you are using unblocked-unspanned input files, you can only do an 
address out sort. In this case, the output file has a blocked-spanned format 
with a record length of four. 



Output File Size for Blocked -Spanned File 

The marked size of the output file in a standard sort for blocked- spanned 
records must be equal to or larger than the input file. This allows all the 
records from the input file to be written to the output file after they are sorted. 



Output File Size for Address Out File 

The marked size of the output file in an address out sort for blocked-spanned 
or unblocked-unspanned input file is computed as follows: 



K-bytes = dumber of records in the input file) 

256 



Use the next K larger file size. 
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Work File 



Some sort jobs do not need a work file. However, if the storage needed to do 
the sort is greater than your system's R/W storage size, your sort job needs a 
work fHe. You can determine approximately how large the work file must be 
by using the charts in Appendix A. Because these charts do not show all 
possible combinations, a formula is shown later in this chapter for that 
purpose. The charts assume you have no IMFs loaded and you are not using a 
J procedure file. IMFs and a procedure file use part of the system's R/W 

storage. 



How To Use Work File Size Charts 

Charts are provided in Appendix A for all system R/W storage sizes and all 
work file diskette sector sizes. Use the chart that matches your system and 
diskette. 

Across the top of each chart are the sort control field sizes. The size of the 
control field is the combined length of all the fields used to determine the sort 
order. Down the left side are the number of records in the file. The numbers 
in the chart show the approximate minimum size for the work file in K-bytes. 
If your exact sort field size or number of records does not appear in the chart, 
use the next higher value to make sure that you have a large enough work file. 
A zero entry in the chart means that a work file is not needed. Also, a work 
file is not needed if fewer than 100 records are sorted. 

The numbers that appear on the extreme right side of the chart are diskette 
format numbers. The lines in the chart show the maximum capacities at which 
that format diskette can be used. Your work file size must appear above the 
line for the diskette format you are using. 
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For example, assume you have a 16K system with a 128-byte diskette sector 
size and format 1 . You would use the following chart from Appendix A. 



SYSTEM SI7.E= 16K 
UQRK FILE SECTOR 



SIZE= 128 



RECORDS 

250 

500 

750 

1000 

1500 

2000 

250 

3000 

3500 

5000 

7500 

10000 

15000 

200 

30000 



8 12 16 20 2*+ 



MASK 
28 32 



LENGTH 
36 40 



44 i+8 52 56 60 6>+ 







7 

9 

26 

31* 

1+2 

50 

58 

82 

122 

160 

240 






11 

1* 

•+0 

54 

66 

80 

92 

130 

194 




9 

13 

34 

50 

66 

82 

98 

112 

160 

238 




12 

34 

46 

66 

88 

108 

130 

150 

214| 

|320 

426 1 




14 

40 

54 

78 

104 

130 

154 

180 




17 

50 

66 

98 

128 

160 

192 

99 / ? 


9 

34 

50 

66 

96 

128 

160 

190 

222 


12 

44 

66 

86 

128 

170 

01 o 

il. J. *'- 


12 

44 

66 

86 

130 

172 

214 


17 

66 

96 

128 

190 


17 

66 

96 

128 

190 


17 

66 

96 

128 

190 


17 

66 

98 

128 

192 


17 
66 

98 

192 


17 

66 

98 

128 

192 


33 
128 

190 1 


252 

378 4 


316 
378 

440 


2^2 
316 
378 

440 


252 
316 
378 

440 


254 

318 
380 
444 


254 
318 
380 

444 


S54 

318 
380 

444 




252 

294 

■+20 


256 
298 
424] 




256 

382 


316 

474 


316 

472 






















2$a 

384 


316 

474 














318 

476 









For our example, the records have a 15-position control field with 1000 
records in the file. We must use a 16-position control field because the chart 
does not show a 15-position control field. From the chart you can see that a 
work file of at least 46K would be required. 

The work file must be a marked, unused file. When the sort is finished, the 
program displays a message to indicate work file usage. Then the program 
marks the work file as an unused file. 



Control File 



The control file contains sort statements. The sort statements are read from 
the control file each time the sort program is executed, eliminating the need to 
rekey the sort statements. The sort statements for a given sort are identified 
by the sort group name parameter in the sort group name statement. 
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You can write an APL or BASIC program to create the control file. Two simple 
methods of creating a control file are shown later. Any diskette format except 
format 9 can be used for the control file. The control file must: 

• Be a record I/O data file 

• Have blocked-spanned records 

• Have a logical record length of 64 

The sort statements for each sort group must be written on the control file in 
the same order as they are specified for the sort program. The order of the 
statements is: 

1 . Sort group name 

2. Comment (optional) 

3. SORT 

4. MASK 

5. ALTS (optional) 

6. WORK (optional) 

Each group of sort statements must have a unique name specified for the 
sort-group-name parameter of the sort group name statement. Up to 150 sort 
statements can be in a single group on a 16K system; more statements can be 
used with a larger system. The amount of R/W storage available determines 
the number of statements that can be in a sort group. The sort-group-name is 
used to retrieve the correct group of sort statements from the control file. The 
sort statements are read from the control file by a FILE statement. 

The following is the sort group for our example. 

**■ SALES 

K80RT CUSTOMER FILE BY TERRITORY. SALES REP AND YTD SALES 

SORT I , MASTER , 1 , 1 , SALES , 2 

MASK 5,2, A, 15,5, A, 7, 8,0 

WORK 2,1. 
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How to Create A Control File 

The following are two methods of creating the control file. One method uses 
APL, the other BASIC. Both methods create a file named CONTROL on file 1 
on diskette drive 1. 



APL: Use the following APL statements to create the control file for our 
example. 

1. 1 |"|SVO 'OUT' 

2. U T *• ' U T F 1 1 1 I D = < C N T R L ) T Y P £ ~ I ' 

3. 0UT<-6M-t ' ** SALES' 

3. 0UT*-6"+t "*SORT CUSTOMER FILE BY TERRITORY, SALES REP AND YTD SALES 

3. U T <- 6 «+ 1 ' S R T 1 , M A S T E R , 1 , 1 > S A L E S , 2 ' 

3. 0l.n>6Mt 'MASK 5 * 2 , A , 15 , 5 , A , 7 , 8 , ' 

3. 0UT<-6"+t 'WORK 2/1' 

4. OLn>\0 



Statement 1 offers a shared variable called OUT. Statement 2 assigns the 
open parameter string to the shared variable. Statement 3 is repeated for each 
sort statement you want to write on the file. Statement 4 closes the file. 



BASIC: Use the following steps in BASIC to create the control file for our 
example. 



1. LOAD 0,DATA 



2. {) 1 

2. n 2 

2. 3 

2. '■!• 

2. 5 



•ww SALES 

■»SORT CUSTOMER FILE BY TERRITORY, SALES REP AND YTD SALES 

SORT 1 .MASTER, 1, 1, SALES ,2 

MASK 5 , 2 , A , 1 5 , 5 j A , 7 , 8 , 

UORK 2,1 



3. S A V E 1 , • N 'I - R L : , R E C L ™ 6 M- , D 8 



Statement 1 allows you to enter data from the keyboard into the work area. 
Statement 2 is the data for the sort statements. Enter each line after the line 
number and colon are displayed. Statement 3 writes the data from the work 
area on the file. 
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STATEMENTS 



The sort statements may be entered from the keyboard or read from a control 
file. The sort statement length must not exceed 64 characters. Spaces are not 
allowed within or between the parameters of sort statements. If a space is 
found, error 302 is displayed. Also blanks (spaces) must follow the last 
parameter; if they do not, error 304 results. An exception is that a comma may 
follow the last parameter of an ALTS statement. 

The six types of sort statements and their order of entry are: 

1 . Sort group name statement (required only with control file) 

2. Comment statements (optional only with control file) 

3. SORT statement 

4. MASK statement 

5. ALTS statement (optional) 

6. WORK statement (optional) 



FILE Statement 

A FILE statement is entered from the keyboard or read from a procedure file. 
The FILE statement specifies where the control file is located and which sort 
group to read. The command syntax is: 



FILE 



where: 



sort- group- name, control-file- number, [control-filename], 
drive- number 



sort- group- name, 



control-file- number, 



control-file-name, 



is the name of the sort group. This name must 
be the same as the name given in the sort group 
name statement you want. 

is the file number of the control file. A maximum 
of four digits can be used. 

(optional) is the name assigned to the control file. 
A maximum of 1 7 characters can be used. If the 
name is not used, the comma must still be 
entered. 



drive- number 



is the control file diskette drive number. The 
valid entries are 1 , 2, 3, or 4. 



For our example, assume you created a control file on file 5 and that the file is 
called EXAMPLE. The file statement would be: 

Sort Group Name 

File Number of the Control File 

Name of the Control File 

Drive Number of the Control File 



FILE SALES, 5, EXAMPLE, :l. 
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Sort Group Name Statement 

The sort group name statement is used only when the sort statements are read 
from a control file. The control file can contain several sets of sort statements. 
Each set of sort statements is identified and starts with a sort group name 
statement. All sort statements that follow the sort group name statement 
belong to that sort group. 

The sort group name statement has # *(asterisks) in positions 1 and 2. The sort 
group name starts in position 3. The name can have up to 8 alphameric 
characters. The first character of the name must be alphabetic (A through Z). 

For our example, if we were to write the sort statements on the control file, 
the sort group name statements and the other sort statements would look like 
this: 

ww COST 

wSORT THE COST FILE 

S (!) R T ° ** ° ** f> ° ** *> 

MASK -' <J '■■' o c> ° c ' 4> 

ww SALES 

wSORT CUSTOMER FILE BY TERRITORY, SALES REP AND YTT'i SALES 

SORT 1 .MASTER, 1, I, SALES, 2 

MASK 5,2, A, 15,5, A, 7, 8,0 



FILE IS SORTED FOR CHECK RUN 



WORK 2, 


1 


wwPAYROL 


wPAYROL 


.L 


SORT <> 


<> 


MASK * 


<:• 


WORK - 


<> 



The **SALES is the sort group name statement. 

Comment Statement 

The comment statement can be used only in a control file. Any number of 
comment statements may be used as long as the maximum number of 
statements for the sort group is not exceeded. The comment statements along 
with the other statements in the sort control group are displayed after being 
read from the control file. The comment statement can be used to identify the 
type of sort and the input and output files. It also can provide special 
information to the operator about the sort. The comment statement is not 
required. If used, it follows the sort group name statement and comes before 
the sort statement. 

The comment statement has an *(asterisk) in position 1 . The remaining 63 
positions can be used for comments as in our example: 



wSORT CUSTOMER FILE BY TERRITORY, SALES REP AND YTD SALES 
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SORT Statement 



The SORT statement is required. The SORT statement describes the data files 
used and the type of sort to be performed by the sort program. The command 
syntax is: 



SORT 



where: 



input-number, [input-name], input-drive, output-number, 
[output- name], output-drive [, sort-type] 



input- number, 
input- name, 

input- drive, 
output- number, 
output- name. 



output-drive. 



sort-type 



is the file number of the input file. A maximum 
of four digits can be used (0001 -9999). 

(optional) is the name assigned to the input file. 
A maximum of 1 7 characters can be used. If the 
name is not used, a comma must still be entered. 

is the input file diskette drive number. The valid 
entries are 1 , 2, 3, or 4. 

is the file number of the output file. A maximum 
of four digits can be used (0001-9999). 

(optional) is the name to be assigned to the 
output file. A maximum of 1 7 characters can be 
used. If the name is not used, a comma must 
still be entered and the name that exists on the 
diskette will be used. 

is the output file diskette drive number. The valid 
entries are 1 , 2, 3, or 4. 

(optional) leave blank for a standard sort (the 
complete record is sorted), enter an A for 
address out sort. 



In our example, the SORT statement looks like this: 



SORT 1 , MASTER , 1 , 1 > SALES , 2 



Input File Number 
Input File Name 
Input File Drive Number 
Output File Number 
Output File Name 
Output File Drive Number 
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MASK Statement 

The MASK statement is required and follows the SORT statement. The MASK 
statement specifies the sort fields. A maximum of six sort fields can be 
specified. The sum of the lengths of the sort fields (MASK length) must not 
exceed 64 positions. Field 1 (first field you specify) is the sort field that plays 
the largest role in determining the order of the sort. Each additional field you 
specify plays a smaller role in determining the final order of the sorted record. 
The command syntax is: 



MASK 



where: 



field- 1 -starting-position-number, field- 1 -length, 
type[ ] 



field- 1 -starting 
- position- number. 



is the leftmost location of the sort field. A 
maximum of four digits can be used. 



field- 1 -length, 



type, 



Type Of Data 

Character 

Floating point 
(internal numeric) 



is the length of the sort field. A maximum of two 
digits can be used. When BASIC internal 
numeric data is sorted, the valid length entries 
are 4 (short precision) or 8 (long precision). 

identifies the type of data and specifies the sort 
sequence for the field. The valid entries are: 

Example BASIC 
Form Statement to 



Entry 
Entry Ascending Descending 



A 
F 



Signed character N 



D 
G 

O 



Create This Data 
FORM C9 

FORM S (short precision) 
FORM L (long precision) 

FORM PIC (-ZZZZ.##) 



Zoned decimal Z 

(numeric character) 



Packed decimal 

binary (2-, 4-, 
8-byte) 



Q 
C 



FORM NC5 



FORM PD7 



FORMB2 
FORM B4 
FORMB8 



} 



(only one needed) 
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Character data is written by an APL program and by a BASIC program when a 
character variable or character constant is specified for output. The FORM 
statement in BASIC can also be used to change numeric data into character 
data. BASIC internal numeric (floating point) data is written when a numeric 
variable in BASIC is specified for output. Sign character data is written when 
PIC is used in the FORM statement in BASIC. 

When signed character (entry N or 0) data is sorted, the following conditions 
must be met: 

• A sign must be in the leftmost position of the field. 

• A blank in the leftmost position of the field is the same as a plus sign. 

• The digits must be right-justified in the field. 

• The complete field must be used as a sort field. 

• Leading blanks are the same as zeros. 

• Characters such as $ and . can appear in the field as long as they always 
appear in the same position. 

For more information on the types of data, see the APL or BASIC reference 
manual listed in the preface. 

In our example, the MASK statement looked like this: 



Starting Location of High-Order Sort Field (sales territory) 
Length of Sort Field 
Characters in Ascending Order 

Starting Location of the Sort Field (sales representative) 
Length of Sort Field 
Characters in Ascending Order 

Starting Location of the Low-Order Sort Field (YTD sales) 

Length of Sort Field 

Signed Character in Descending Order 



MASK 5, 2> A, 15, 5, A, 7,8*0 
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ALTS Statement 

The ALTS statement is used when you want to alter the collating sequence 
used by the sort program. The collating sequence is restored to the original 
sequence when the next SORT statement is read. Note: The ALTS statement 
should only be used with the character sorts. 

The collating sequence used by the sort is shown in the chart. The command 
syntax is: 

ALTS new-location original- location [,...] 



where: 



new- location 



original -location 



is the hexadecimal number from the entry column 
of the chart for the new location of the character 
you want to change. 



is the hexadecimal number from the entry column 
of the chart of the character you want to move. 
Note that a comma can be used after the last entry but that it is not required. 

For example, if you want the numbers to sort before the alphabetic characters, 
the ALTS statement would be: 



ALTS 30F0.31F1.32F2 ,39F9 

When a character is moved into a sequence position normally assigned to 
another, both the new and the original character will occupy the same position 
in the sequence and will be considered equal. If the two characters are not to 
be equal, the character that normally occupies that position must also be 
moved. 
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Entry 


01 
02 
03 
0M- 
05 
06 

7 
OB 
09 
OA 
OB 
OC 

on 

OE 
OF 
10 
1.1 
12 
13 
1M- 
15 
16 
17 
IB 
19 
1A 
IB 
1C 
ID 
IE 

1 »•■" 

2 
21 

9 9 

23 
2M- 
25 
26 
27 
28 
29 

2 A 
2B 
2C 
2D 
2E 
2F 

3 
31 
32 
33 



Graphic 



Entry 

3M- 
35 
36 
37 
38 
39 
3 A 
3B 
3C 
3D 
3E 
3F 
i+O 
i+ 1 
M-2 
'•1-3 

'1 5 
M-6 
M-7 
M-8 
l.|.9 

MA 
M-B 
MC 

me 

MF 

5 
51 
52 
53 
5M- 
55 
56 
57 
5B 
59 
5A 
5B 
5C 
5D 
5E 
5F 

6 
61 
62 
63 
6M- 
65 
66 
6 



Graphic 



Entry 



Graphic 



"/ 



68 


Y 


69 


i.. 


6A 


i 
i 


6B 


; 


6C 


"/. 


6D 




6E 




6F 


? 


7 


& 


71 


A 


72 




73 


A 


7M- 




75 


II) 


76 




77 




78 


V 


79 




7 A 


I 


7B 


** 


7C 


(ft 


7D 


' 


7E 




7F 


•■ 


BO 


.•V 


81 


a 


82 


b 


83 


c: 


BM 


c:l 


85 


{•■ 


86 


•(•' 


87 


<-'.i 


88 


h 


89 


i 


8 A 


t 


8B 


I 


8C 


J: 


8D 


1" 


BE 


1 


8r : 


-f 


9 


i::i 


91 


j 


92 


l< 


93 


I 


9M- 


m 


95 


n 


96 





97 


P 


98 


q 


99 


V 


9 A 


::> 


9B 


<:: 



Entry 

9C 
9D 
9E 
9F 
AO 
Al 
A2 
A3 
AM- 
A5 
A 6 
A 7 
A 8 
A 9 
A A 
AB 
AC 
AD 
AE 
AF 
BO 
Bl 
B2 
B3 
BM- 
B5 
B6 
B7 

B8 
B9 
BA 
BB 
DC 
BD 
BE 
BF 
CO 
C 1 
C2 
C3 
CM- 
C5 
C6 
C7 
C8 
C9 
CA 
CB 
CC 
CD 
CE 
CF 



Graphic 



O 



Entry 

DO 
Dl 
D2 
D3 
HM- 
DS 
D6 
D7 
D8 
D9 
DA 
DB 
DC 
DD 
DE 
DF 
EO 
El 
E2 
E3 
EM- 
E5 
£6 
E7 
E8 
E9 
EA 
EB 
EC 
ED 
EE 
EF 
FO 
Fl. 
F2 

F3 
F LI- 
ES 
F6 

F8 
F9 
FA 
FB 
EC 
FD 



Graphic 

> 
J 

K 
L 
M 
N 

P 

Q 
R 

:c 
i 

n 



\ 



Note: The EBCDIC graphics are shown in this chart. See the appropriate language reference manual for 
the graphics displayed for other national character sets. Graphics are assigned to all blank positions (except 
hex 40) for maintenance purposes. These graphics are incompatible with other systems and cannot be used 
for exchange purposes. These graphics may be removed or changed as a result of maintenance or new 
versions of this product. 
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WORK Statement 

The WORK statement follows the ALTS statement. The WORK statement 
identifies the work file if one is required. The command syntax is: 

WORK file-number, drive-number 
where: 



file-number, is the file number of the work file. A maximum 

of four digits can be used. 

drive-number is the work file diskette drive number. The valid 

entries are 1, 2, 3, or 4. 

In our example, the WORK statement looked like this: 



In our example, we have a 16K system with a 128-byte sector work file 
diskette. There are 1000 records in the file. Each record has 15 positions in 
the control field. Now, based on the table in Appendix A, the work file should 
be at least a 46K file. When using the chart for this example you must use a 
16-position control field because the chart does not have an entry for a 
15-position field. 
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OPERATION 



The )SORT (for APL) or UTIL SORT (for BASIC) command is used to activate 
the sort program. The sort program then determines the source of the sort 
statements by displaying the following: 

CONTROL GROUP STATEMENT INPUT 
OPTIONS ARE: 

1, CONTROL FILE ON DISKETTE 

2, KEYBOARD ENTRY 

3, STOP 

ENTER OPTION NUMBER, PRESS EXECUTE 



When sort statements are entered from the keyboard, the sort program 
displays the sort statement keyword on the input line. The cursor is then 
positioned to enter the first parameter. Anytime the sort program is requesting 
input from the keyboard you can enter STOP. STOP must appear in the first 
four positions of the input line. When STOP is entered, you can restart the 
sort or return to the language. 



Control File 



Entering a 1 in response to the first display means that the sort statements are 
located on the control file. The following is then displayed: 



ENTER FILE STATEMENT 

SORT GROUP NAME, 
C N T R L F I L E N U M B E R. 
CONTROL FILE NAME, 
DRIVE NUMBER 

OR ENTER STOP 

AND THEN PRESS EXECUTI 

ILE .... 



After the information for the FILE statement is entered, the control group is 
read. A message to mount the sort files is then displayed: 

MOUNT SORT FILES, 

AND THEN PRESS EXECUTE 
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After the sort files are mounted and the EXECUTE key is pressed, the sort 
statements are read and displayed. 

The sort program also checks the sort statements for errors. If any errors are 
found, you will be allowed to correct them. However, these corrections are not 
saved on the control group file. Only 1 2 statements can be displayed at a 
time. When the sort control group contains more than 1 2 statements, press 
the EXECUTE key to display the additional statements. After all sort 
statements have been displayed and corrections have been made, press the 
EXECUTE key to begin the sort or enter STOP to end the sort. 



Keyboard Entry 

Entering a 2 in response to the control group statement input display means 
that the sort statements are entered from the keyboard. A message to remind 
you to mount the sort file is displayed. After the sort files have been mounted 
and the EXECUTE key is pressed, the following is displayed: 

ENTER SORT STATEMENT 



INPUT 


NUMBER, 






INPUT 


NAME, 






INPUT 


DRIVE, 






OUTPUT 


NUMBER, 






OUTPUT 


NAME, 






OUTPUT- 


DRIVE, 






SORT TYPE 






OR ENTER 


STOP 






AND THEN 


PRESS E 


:xe 


CUT 



SORT 



After the parameters for the SORT statement have been entered and the 
EXECUTE key is pressed, the following is displayed: 

ENTER MASK STATEMENT 

FIELD 1 STARTING POSITION NUMBER, 

FIELD 3. LENGTH, 

TYPE 1 (A, D, N, 0, F, G, Z, Y, P, Q, B, OR C) 

FIELD 2 STARTING POSITION NUMBER, 

FIELD 2 LENGTH, 

TYPE 2 (A, D, N, 0, F, G, Z, Y, P, Q, B, OR C) 

UP TO 6 FIELDS 

OR ENTER STOP 

AND THEN PRESS EXECUTE 



MASK 



76 



AL" 



After the parameters for the MASK statement have been entered and the 
EXECUTE key is pressed, the following is displayed: 

PRESS EXECUTE TO USE THE STANDARD COLLATING SEQUENCE, 
OR ENTER ALTERNATE COLLATING SEQUENCE STATEMENT (S^- 

NEU--LOCATION 1 ORIGINAL-LOCATION I, 
NEW -LOCATION 2 ORIGINAL-LOCATION 2, 

ENTER AS MANY PAIRS AS NEEDED 

OR ENTER STOP 

AND THEN PRESS EXECUTE 



If you do not want to change the collating sequence, just press the EXECUTE 
key. 

To change the collating sequence, enter hexadecimal numbers that represent 
the changes, then press the EXECUTE key. From one to 1 2 changes can be 
entered on a single line. The same message will be displayed again to allow 
you to make additional changes. After you have made all your collating 
sequence changes, press the EXECUTE key. 

The following is then displayed: 

PRESS EXECUTE TO DO THE SORT, 
OR ENTER A WORK STATEMENT 

FILE NUMBER, 
DRIVE NUMBER 

OR ENTER STOP 

AND THEN PRESS EXECUTE 

WORK .... 



If a work file is not needed, just press the EXECUTE key. If you need a work 
file, enter the file number and diskette drive number before you press the 
EXECUTE key. The sort begins after the EXECUTE key is pressed. 

If the sort program determines that a work file is needed and one was not 
specified, error 337 occurs. The previous message requesting a work 
statement is displayed along with the 337 error code. You can then enter a 
work statement and continue the sort. 
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Stop 



Entering a 3 in response to the control group statement input display ends the 
sort program. The sort program is also ended when STOP is entered in 
positions 1 through 4 anytime the program is expecting input from the 
keyboard. When the sort program ends, the following is displayed: 



SORT COMPLETED, 
OPTIONS ARE: 

1 . EXECUTE SORT AGAIN 

2. RETURN TO API. OR BASIC 

ENTER OPTION NUMBER, PRESS EXECUTE 



This message can be displayed when error 325, 326, 338, or 340 occurs or 
when any diskette error occurs during the sort. Therefore, check to make sure 
an error code is not displayed with this message. 

If a work file was used during the sort, the amount of the work file storage 
used is shown in this display also. 



Procedure File 

The sort program can be executed by statements in the procedure file. The 
)PROC (APL) or PROC (BASIC) command is used to activate the procedure file. 
The procedure file must contain the )SORT (APL) or UTIL SORT (BASIC) 
statement and the FILE statement for each file you want to sort. The control, 
input, output, and work (if one is required) files must all be online before the 
procedure file is executed. All operator responses are bypassed unless an error 
is found. Except for error 337, errors cause the sort to return to the manual 
method of operation, and the procedure file operation is terminated. If error 
337 is the only error encountered, the procedure file will continue when SORT 
completes. The BASIC system device is not changed by the sort program. 
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Following is a sample SORT program executed in an APL procedure file: 



>LGAD 11002 

PGM1 

)SORT 

FILE BALES, 5, EXAMPLE, 1 

)LQAD 110 03 

PGM 2 



The equivalent procedure file for BASIC is as follows: 

UTIL SYS D80 

LOAD 2 

RUN 

UTIL SORT 

FILE SALES, 5, EXAMPLE, 1 

LOAD 3 

RUN 



The procedure file is accessed when you enter a PROC command. A PROC 
command instructs the system to begin using the procedure file in the 
indicated file, as shown below: 

PROC 'l-,D80 



The system then loads file 4 and begins executing the lines in the file, one 
record at a time. 



Hints 



File names may be either simple or complex. The names SYSAREA and 
ERRORSET cannot be used. 

The work and output files must be marked and unused. 

The control file must be a record I/O file with blocked-spanned records. 
The record length must be 64. 

When the input file contains records with equal values in the control field, 
these records in the output file may not be in the same order as they were 
in the input file. 
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ADDITIONAL INFORMATION 

Performance Considerations 

The following conditions can lessen the time required to perform sort: 
Having fewer records to sort 
Having a smaller control field 
Having a smaller logical record size 
Having a blocked-spanned input file 

Having the input, output, and work files on different diskettes 
Not using an alternate collating sequence 
Using the address out sort 



Work File Storage Requirements 

The following APL and BASIC programs will determine the size of your work 
file if one is needed. 



Diskette 


Maximum 


Format 


File Size 


1 


240K 


2 


277K 


3 


296K 


4 


481 K 


5 


555K 


6 


592K 


7 


962K 


8 


1,110K 



For information about format, refer to Chapter 3, Diskette Initialization. 
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APL Program 





vworkfileccpv 




V 


W0RKF1LE ; l< ; U ; M ; C ; B ; R ; A ; B ; K :l. ; T ; G ; I ; I :l. ; I... ; S 


CI 3 


'ENTER MACHINE SIZE IN It OF l<* 


i:.2::i 


KH3 


i:: 3 ::i 


'ENTER WORK FILE SECTOR SIZE IN H OF BYT 


CMO 


wh::i 


1 'r. "1 


'ENTER MASK LENGTH IN tt OF BYTES' 


ii6:i 


mhi 


C7'J 


'ENTER tt OF RECORDS IN INPUT FILE' 


i:s:i 


R<-D 


C9:i 


f>1.t<<K< 1.6 32 MS 6M>/ 550 1.650 2595 3B5 


c i o :i 


2>0 


i: i i ::i 


...o : 


r.:i.2:i 


8<-C 


i:::i3::i 


...1. : 


r„m:i 


OC + 1 


CI 5 3 


T<-L.2»C 


i: .1.6:1 


-k'T ::;:l.6)/L2 


cm 


T<-16 


II IS II 


...2 ; 


i::.L9::i 


A«-2x<"l + T+2x2*T> 


r: 2 o ::i 


Ki<-7+(A+Cx(M+7) )->:L0 2'+ 


r?i i 


•»<|<:!.>K)/L3 


\??i 


4(C>R)/U 


1 VM 1 


•H...1. 


i:2'i::i i 


„,3: 


C253 


B*C~1. 


C26::i 


-KB~S)/L5 


C273 


'T>LU*M+«+ 


i:2b:j 


G«-rB*T 


i::29:.i 


I*"|..:n.<-Rv-B 


C30:i 


L<-1 + (UxGkI)~102'+ 


C313 


SK-R-BxI 


C32.1 


S2<-rSJ.rT 


1:33:1 


Z<" r L+ (S2.kW)v- 10 2'+ 


L3'i::i 


Z<"(l+"2>I1)»7. 


1:35:1 i 


,M- \ 


i::36::i 


MACHINE SIZE 


' ;k 


C37 3 


'WORK FILE SECTOR SIZE 


' ;w 


i:3b:i 


MASK LENGTH 


■ ;m 


C39II 


** OF RECORDS 


■ ;r 


i::'io::i 


WORK FILE SIZE 


" ; z 


cm- 2:1 i 
i::'+3::i 


■+0 


OL.C*0 .9 


i::'+4-:i 


■H,0 








5) 
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7 Progra 


m 


1 


PRINT 'ENTER MACHINE SIZE IN tt OF l< * 


0020 


INPUT l< 


030 


PRINT 'ENTER WORK FILE SECTOR SIZE IN ti 


01+0 


INPUT W 


0050 


PRINT 'ENTER MASK LENGTH IN $* OF BYTES' 


0060 


INPUT M 


0070 


PRINT 'ENTER tt OF RECORDS IN INPUT FILE 


0080 


INPUT R 


090 


IF K<16 GOTO 50 


0100 


IF K<32 GOTO 520 


1 1 


IF i<:;;J+8 GOTO 54-0 


0120 


Z=0 


0130 


C=3855 


omo 


S=C 


0150 


OC+1 


0160 


T=2tINT(LTW(C)+lE-10) 


0170 


IF T<16 GOTO 190 


0180 


T=16 


0190 


A=2*<2*T~1+T) 


020 


K 1 =7+ ( < A»- < C* < M+7 ) ) ) /1 24- ) 


0210 


IF K1>K GOTO 24-0 


0220 


IF C>R GOTO "+20 


0230 


GOTO 150 


02M0 


B=C~1 


0250 


IF B=S GOTO 4-80 


0260 


T=INT(W/(M+<+)> 


0270 


G=B/T 


0280 


IF G=INKG) GOTO 30 


0290 


G=INKG+1> 


030 


I1=R/B 


0310 


I « INK 11 ) 


0320 


L=<<W*G*I)/102M.) + 1 


0330 


S1=R~<B*I> 


03»+0 


S2=S1/T 


0350 


IF S2«INKS2) GOTO 370 


0360 


S2~INKS2+1) 


0370 


Z«(S2*W)/102M.+L 


0380 


IF Z=INT(Z) GOTO "+0 


0390 


Z=INT(Z+1) 


0M-00 


IF Il<2 GOTO 4-20 


0M-10 


Z=Z*2 


0M-20 


PRINT ' MACHINE SIZE: ' , K 


01+30 


PRINT 'WORK FILE SECTOR SIZE: \W 


O'+i+O 


PRINT ' MASK LENGTH: ' , M 


04-50 


PRINT ' ** OF RECORDS: ' , R 


0«+60 


PRINT ' WORK FILE SIZE: ' ,Z 


04-70 


STOP 


04-80 


C=INT(C#.9) 


04-90 


GOTO 140 


050 


C=550 


0510 


GOTO 140 


0520 


0=1650 


0530 


GOTO 140 


0540 


02595 


0550 


GOTO 140 



OF BYTES 
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Appendix A: Sort Work File Size Charts 



The number within the charts are the K-byte size of the work file. The numbers on the 
extreme right side of the chart are diskette format numbers. The lines in the chart show 
the maximum capacities at which that format diskette can be used. A zero entry in the 
chart means that a work file is not needed. 



SYSTEM SIZE* 16K 
UORK FILE SECTOR 



SIZE* 128 



RECORDS 

250 

500 

750 

1000 

1500 

2000 

2500 

3000 

3500 

5000 

7500 

10000 

15000 

20000 

30000 



8 



16 20 24 



MASK 
28 32 



LENGTH 
36 40 



44 1+8 52 56 60 64 



26 
34 

42 
50 

58 
iHHi 






11 
1* 

40 
54 

"""1SZ" 

80 

92 

130 

i94 




9 
13 
34 
50 
66 
82 
98 
112 

XImWW 





34 

46 

66 

88 
108 
130 

21MJ256 

320 382 





14 

1+0 

51+ 

78 

101+ 

130 

151+ 

ilii 






17 

50 

60 

98 

128 

160 

192 

TOO 



9 

34 

50 

66 

96 

128 

160 

190 



1 r> 

J* Am 

*** 66 

86 
128 
170 
?n 



tMltll 
I+7M. 



252 
294 
3i6,42U 

472 



12 17 

44 66 

66 96 

86 128 

130 190 

■II 



'"214" 




252 
316 
256 378 

298 440 
L424J 



316 
378 
440 



252 
316 
378 

440 



254 
318 
380 



jfc*\J*T A.JT i 

318 318 

380 380 

L|.L|.L|. \\.\.\.l\. 
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SYSTEM 
UIORK F 

RECORDS 


SIZI 
CLE < 

3 4 


;>== 16K 
SECTOR SIZE- 

8 12 16 


256 
20 


24 


MASK 
28 32 


LENGTH 
36 i+0 


L|.t+ 


'+8 


52 


56 


60 


64 


250 

500 

750 

J. 

150 

20 




8 
9 
28 
36 

i+i+ 

52 

60 

84 

124 

164 

246 






11 

14 

i+O 

64 

76 

88 

126 

186 

a.'tcJj 




9 

13 

34 

50 

66 

82 

98 

112 

160 

238 



12 

34 

46 

66 

88 

108 

130 

150 

4 J.T 




14 

'+2 

54 

80 

106 

132 

156 

182 

260 




16 

'+6 

60 

88 

116 

14- 6 

174 

202 

288 


9 10 

34 38 

50 56 

66 74 

96 110 

128 148 

160 184 

190 220 

222 256 


12 

66 
86 

130 
172 
21.1+ 

4&* wO 


14 
SH- 
IS 
104 

1.54 
204 
254 


l'+ 
52 
78 
102 
1 5 2 
202 
252 


17 
66 

98 

130 
192 
256 


17 

66 

98 

128 

192 

254 


17 

66 

98 

130 

194 

258 


17 

66 

98 

130 

194 

258 


22 
8© 

128 
170 

252 2 


250 


320 

446 

\6$6 
952 


318 
380 
i+ i+i+ 

6%± 

9'+6 


"$ o ':> 

386 

1+50 

642 

960 


"K".>".> 

w «... jit.. 

'+50 
6*+2 

962 


420 


30 


35'+ 
506 


302 
352 
502 


502 


350 


298 
424 


586 s 


50 


316 364 
'+72 5M-M- 


836 7 


750 


320 
426 


388 
\^16 


•+30 
574 


634 
844 


756 


7 •=:':» 




1 


^16 

1+71+ 


628 724 

94-0108'+ 
















15000 


370 
492 


636 


772 


858 






20000 


326 

488 


630 

941+ 












3000 


736 
982 




1+0 00 


648 

810 






50000 







SYSTEM SIZE- 16K 
UORK FILE SECTOR 



SI 



12 



RECORD 

250 

50 

750 

1 

150 

20 

250 

30 

350 

50 

750 

10 

150 

20000 

30 00 

4-0000 

50 000 

60000 















MASK 


LENGTH 














S 4- 


8 


12 


16 


2 


24 


28 


32 


36 


40 


44 


48 


52 


56 


60 


64 




















10 


10 


12 


13 


14 


1.6 


16 


1.8 


18 


1.9 








10 


X w~ 


14 


16 


36 


38 


*T :T 


48 


52 


60 


60 


68 


68 


74 


8 


11 


13 


34 


40 


46 


52 


56 


66 


72 


78 


88 


90 


102 


102 


1.10 


10 


14 


36 


l+t+ 


*?*? 

*•*!&» 


60 


68 


74 


86 


96 


102 


116 


118 


134 


134 


146 


28 


4-0 


52 


66 


76 


88 


100 


1 1 


130 


142 


152 


174 


176 


20 


20 


21.8 


36 


54- 


68 


86 


102 


116 


X W«i. 


148 


172 


188 


*:>0O 


230 


234 


266 


266 


'^88 


'+'+ 


66 


84 


108 


126 


146 


1.64 


184 


214 


234 


252 


288 


292 


332 


332 


360 


54- 
62 
88 

1.30 

256 


78 

92 

130 


100 
116 
166 


130 

150 
214 


152 
176 
250 


174 

20 2 

*,:88. 


196 

228 


256 


256 


280 f 


302 
352 
502 


344 

402 
572 


350 

408 


396 

462 
\6U 

988 


398 

464 
662 

992 J 


432 


298 
424 


326 
464 


502 


326 


364 


fte 


194 
256 


246 


320 
426 


374 
500 


430 

574 1 


486 


544 


634 
844 


696 752 
9261002 


858 


870 


.074 


328 


648 724 

97010 84 












384 

\j i. /&. 

166 

1020 


490 


636 
848 


748 
996 


858 










340 

510 


|654 
980 
















680 

84-8 










■ 0*8 

































84 



SYSTEM SIZE* 32K 

UORK FILE SECTOR SIZE* 128 



ECORDS 4 


8 


12 


16 


20 


24 


MASK 
?« "JO 

aV. W W A-. 


LENGTH 
36 40 


44 


48 


52 56 60 


64 


250 
500 
750 












17 

21 

25 

29 

120 
160 
24 










20 

27 

33 

78 

90 

192 







25 
33 
82 
98 

X X A*.. 

160 

238 






^m 

33 
43 
108 
128 
150 
212 








27 

39 

104 

128 

154 

178 








33 

48 

128 

160 

190 

A- Am AV 




33 

96 
128 
160 

*90? 
':> ':> o 




&m 

33 

43 

128 

170 

*» J. A„ 






33 

43 

128 

170 

212 





48 

64 

190 



33 

48 

190 




33 
48 

190 




•m mm «M MM *Mf *M> 

0& oi5 Ow 

48 48 96 
128 128 128 

190 190 190 




mmmmmm 

190 1 


1000 
1500 


life 

378 * 


20 
2500 


254 

316 
378 

442 


254 

316 
378 

442 


316 
378 

44 


"SMi 2m $S2 

316 316 316 
378 378 378 

440 442 440 




3000 
350 


2$2 

294 
420 


2$*+ 
296 
422 




5000 


ink 3i6 

380 472 


'Mbfc&Z 












7500 


316 
*20| 










10000 


254 

380 


316 

474 








15000 






20000 
300 


*3 : 18" 
476 









SYSTEM SIZE* 32K 

UORK FILE SECTOR SIZE= 



256 



RECORDS 

250 

50 

750 

1000 

150 

2000 

250 

3000 

3500 

5000 

7500 

10000 

15000 

20000 

30 00 

40000 

50000 

60000 



8 12 16 20 24 



MASK 
28 32 



LENGTH 
36 40 



44 48 52 



60 64 


















00000000 

















d a? 13 33 33 33 *3 











25 


28 


33 39 39 48 48 49 98 128 








27 29 


33 


37 


43 52 101* 128 128 128 128 170 



17 


20 


25 33 39 43 
33 43 104 114 


96 
128 


1 1 

illUli! 


128 154 154 192 190 192 192 252 


170 20* 20* 254 252 254 254133* 


21 


31 


82 108 128 142 


160 


184 


212 254 254 1316 316 318 316 420 


25 


76 


98 128 154 170 


190 


218 


256 IMk %U 380 378 380 380 502 


29 


88 


112 150 180 198 


4U A- ti» 


256 


[29§ 356 356 442 440 444 442 J586 


82 


124 


160 212 256 1282 


316 


364 


424 506 506 1634 4$8 43£ <OT 836 


1 io 

X Am <&• 


184 


2381318 382 422 


472 


544 


1634 758 758 944 940 948 946| 


162 


244 


316 £24 508I562 


628 


724 


844 1 


240 | 


364 
HP* 


474 1634 760 842 
1632 844 1 
9461 


940 






320 

480 




726 




: ft©3w: : ; 








796 












956 
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SYSTEM 
WORK F 

RECORD 


SIZE 
ILE <i 

S 4 


> 32K 
SECTOR SIZE= 

8 12 16 


512 
20 


24 


MASK 
28 32 


LENGTH 
36 40 


44 


48 




56 


60 


64 


250 

50 

750 

10 









17 

21 

25 
29 

j 22 
240 










20 

26 

32 

76 

88 

124 

186 

246 










25 

33 

82 

98 

114 

162 

242 










32 

42 

104 

124 

144 

204 








26 

37 

100 

124 

148 

172 

244 








30 

44 

116 

144 

172 

200 

286 






25 

33 

96 

128 

160 

190 

2 2 2 






29 

38 

112 

148 

186 

220 

258 






33 

43 

128 

170 

212 






36 

47 

140 

186 

':> ~z '•> 

j£. w j&. 

278 




39 
104 
156 
206 
258 



29 
43 
114 
170 
226 
282 




30 

44 

116 




33 

49 

128 




33 

98 

128 


112 
148 


150 
2000 


172 
228 
286 


192 
254 


192 
254 


220 
292 


250 


318 
380 

H* H* H* 

632 

948 


316 
380 
442 
632 

9461 


366 


3000 


308 

360 
512 


338 

394 
564 


342 
398 
568| 


*38 


350 


298 
424 


324 
462 


510 


5000 


316 

472 


368 

550 


728 


750 


304 
404 
604 
804 


364 
484 
726 
966 


428 
570 | 
852 


634 
844 


692 766 
9221020 


844 


850 


.090 


10 


320 

480 

wrrr. , ii' ,i . i .i"M,-i".<!i 

640 

958 


628 732 
9401096 












15000 


370 
490 










20000 


320 

480 










30000 


736 
980 








MOO 


638 

796l 
956j 






50000 
60000 







SYSTEM SIZE*: 48K 
UORK FILE SECTOR 



SIZE~~; 128 



RECORDS 4 


8 


12 


16 


20 


24 


28 


MASK 
32 


LENGTH 
36 40 


44 


48 


W A» 


56 


60 


64 


250 

500 

750 

1000 


















29 

41 

120 

160 

238 














33 

39 

45 

192 












33 

41 

48 

56 

160 

238 












43 

54 

64 

150 

212 






39 

64 
154 
178 










48 

64 

160 

190 

O n '} 

JW* A« A*. 










48 

64 

160 

190 

2 2 ^ 







64 

85 

212 








43 

64 

170 

212 








64 

95 








64 
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SYSTEM SIZE* 48K 

UQRK FILE SECTOR SIZE = 256 
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SYSTEM SIZE* 64K 

UORK FILE SECTOR SIZE- 
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SYSTEM SIZE* 64K 
UORK FILE SECTOR 
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SYSTEM SIZE- 64K 

UORK FILE SECTOR SIZE= 512 
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Appendix B. Glossary 



address out: A type of sort in which the relative record 
numbers of the sorted records are provided as output. 

basic exchange: A diskette exchange format that uses 
128 -byte sectors. 

blocked: A term used to indicate that one or more 
logical records are written in each sector (physical 
record). 

bytes: Eight bits used as a processing unit and a unit 
of measure for the 51 10. 

complex file name: A file name made up of two or 
more simple file names with a period between names. 
Up to 17 characters, including the periods, are allowed 
in a complex file name. 

cylinder: The area of a diskette that can be accessed 
without moving the access mechanism. 

cylinder 0: The outermost cylinder on the diskette that 
is used to record information about the data on the 
diskette. 

data set: Another name for a file. 

data set label: A record that defines a file. The name, 
size, location, and organization of a file are defined in 
the data set label. 



IMF: IMFs (internal machine fixes) are supplied by IBM 
to correct machine problems. 

logical record: All the data that relates to a common 
identifier. 

physical record: The amount of data read at one time 
governed by the hardware device and media. 

relative record number: The number of the record 
within a file relative to the beginning of the file. 

sector: Part of a track on a diskette that contains one 
physical record. 

simple file name: A file name of up to 8 characters. 
The first character must be uppercase alphabetic (A-Z). 
Other characters may be alphameric (A-Z, 0-9). 

spanned: A logical record spans the sector (physical 
record) boundaries. 

track: Part of a cylinder on a diskette. 

unblocked: One logical record is written in each sector 
(physical record). 

unspanned: A logical record does not span the sector 
(physical record) boundaries. 



ERMAP: A sector in cylinder that is used to record 
the defective cylinders on the diskette. 

exchange: A diskette format or a data organization that 
allows for the exchange of data between different 
systems. 

extended label area: Additional area of a diskette that 
is used for data set labels. 

file: An organized collection of related records treated 
as a unit (data set). 

format: The size of the sectors and the number of 
sectors in a cylinder of a diskette. 

H-type exchange: A diskette exchange format that 
uses 256- byte sectors. 
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Appendix C. Error Codes 



The error codes in this appendix are arranged in ascending number order. Each 
customer support function is assigned a group of numbers. The group of 
numbers assigned to each function are: 

Numbers Function 

OCX)- 249 See your language reference manual 

250*264 Tape data recovery 

265-274 Tape header recovery 

275-299 Diskette recovery 

300-349 Sort 

350-374 Tape-to-diskette and diskette-to-tape copy 

375-399 Tape-to-tape copy 

400-424 Diskette-to-diskette copy 

425-429 Compress 

430-449 Label display 

450*474 Initialization 

475-499 Loader 

500-999 See your language reference manual 



TAPE DATA RECOVERY 
Error Meaning 



250 

251 

252 
253 



An invalid file number was entered. 



Invalid file type for data recovery. 
Only file types 01, 02, 03, or 08 may 
be used. 



Invalid entry mode. 



Read error on a header label. 



User Response 

Press the EXECUTE key 
to get the option to 
stop or specify another 
file. 

Press the EXECUTE key 
to get the option to 
stop or specify another 
file. 

Press the EXECUTE key 
to get the option menu. 

Press the EXECUTE key 
to get the option menu. 
Then use the tape 
header recovery 
function to correct the 
header. 
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TAPE HEADER RECOVERY 
Meaning 



Error 
265 

266 

267 



268 
269 
270 
271 

272 



No header that caused a read error 
was found. 

The header causing the read error 
cannot be recovered. 

An incorrect length parameter was 
entered. 



The data that was entered is not valid 
for the field requested. 

Invalid entry was made for the 
selection of an option. 

Invalid tape file number. 



R/W storage is not large enough to 
copy the file. 



A two -tape -drive copy was specified 
and the input and output drive 
numbers are the same. 



User Response 

Select another option. 

Select another option. 

Reenter the parameter, 
making sure the length 
is correct. The input 
line following the 
parameter must be 
blank. 

Enter valid data. 

Enter the correct option 
entry. 

Enter a correct tape file 
number. 

Try the recovery 
function again without 
features or IMFs 
loaded. 

Specify different drive 
numbers for the input 
and output file. 



DISKETTE RECOVERY 



275 
276 

277 
278 
279 

280 



Invalid entry was made for the 
selection of an option. 

Invalid diskette drive number. 



Invalid diskette file number. 

No read errors were found in the 
volume label. 

Invalid entry for the label extension 
indicator. 

Invalid entry for the volume surface 
indicator. 



Enter a correct option 
entry. 

Enter 1, 2, 3, or 4 to 
select the diskette 
drive. 

Enter a correct file 
number. 

Select another option. 

Enter a valid label 
extension indicator. 

Enter a valid volume 
surface indicator. 
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DISKETTE RECOVERY (continued) 



Error 
281 

282 

283 

284 

285 

288 

289 

290 

291 
292 

293 
294 
295 



Meaning 

Invalid entry for the physical record 
length. 

Invalid entry for the physical record 
sequence. 

Volume label error. 

No read errors were found in the 
header you specified. 

Invalid entry for the header label. 

Sector size is not supported. 

Header label error. 

File specified for data recovery is not 
file type 2, 8, or 9, or the file 
specified contains no data. 

No read errors were found for the file 
you specified. 

The file type is 9, but sequential 
relocate is not permitted. 

Unable to recover data on this file. 
Data can be copied to another file on 
the same or different diskette. 

R/W storage is not large enough to 
copy the file. 



The diskette selected to copy to has a 
different format than the input 
diskette. 



User Response 

Enter a valid physical 
record length. 

Enter a valid physical 
record sequence. 

Retry recovery using 
option 1. 

Select another option. 



Make a valid header 
label entry. 

Use a different diskette 
that has a valid format. 

Retry recovery using 
option 2. 

Data cannot be 
recovered for other than 
type 2, 8, or 9 files. 

Select another option. 

Data recovery cannot 
be performed on this 
file. 

Continue with the 
function; specify the file 
number you want the 
data copied to. 

Try the recovery 
function again without 
features or IMFs 
loaded. 

Use a diskette for 
output that has the 
same format as the 
input diskette. 



SORT ERROR CODES 



300 



301 



Response to option was: 

- Not numeric 

- Not one of the valid responses 

Invalid name in a sort statement. 



Enter a valid option 
number. 

Enter, starting in 
position 1, one of the 
valid names: FILE, 
SORT, MASK, ALTS, 
WORK, or STOP. 
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SORT ERROR CODES (continued) 
Error Meaning 



302 



303 



304 



305 



306 



307 



308 



309 



310 



User Response 



A space appeared in a sort statement Delete the space from 
parameter. the statement, or enter 

STOP to end the sort. 



The sort-group-name in the FILE 
statement is too long. 

The last parameter of a statement 
was not followed by blanks or the 
SORT statement contains an invalid 
SORT type. 

The logical not character (-.) appears 
on the screen in a sort control 
statement. 



Alphameric characters were expected. 

The logical not character (-0 appears 
on the screen in a sort control 
statement. 

Alphabetic characters were expected. 

The logical not character (-•) appears 
on the screen in a sort control 
statement. 

Numeric characters were expected. 

The logical not character (-*) appears 
on the screen in a sort control 
statement. 

Missing comma between input file 
and output file parameters. 

File number contains more than four 
digits. 



File name contains more than 17 
characters. 



Shorten the name to 8 
characters, or enter 
STOP to end the sort. 

Make sure blanks 
follow the sort 
statement, or enter 
STOP to end the sort. 

Use the following procedure 
and add the calculated number 
of comment statements to 
the control group: 

1. Subtract 123 from the 
input file record length. 

2. Divide the result from 
Step 1 by 64. 

3. Round the result from 
Step 2 up to the next 
whole number. 

Change the entry to 
alphameric characters, 
or enter STOP to end 
the sort. See 
three-step procedure 
under Error 304. 

Change the entry to 
alphabetic characters, 
or enter STOP to end 
the sort. See 
three-step procedure 
under Error 304. 

Change the entry to 
numeric characters, or 
enter STOP to end the 
sort. See three-step 
procedure under Error 
304. 

Enter the comma, or 
enter STOP to end the 
sort. 

Enter file number with 
four digits or less, or 
enter STOP to end the 
sort. 

Enter file name with 17 
characters or less, or 
enter STOP to end the 
sort. 
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SORT ERROR CODES (continued) 
Error Meaning 



311 



312 



313 



314 



315 



316 



317 



318 



319 



320 



Comma was entered in place of the 
diskette drive number. 



User Response 

Enter the diskette drive 
number, or enter STOP 
to end the sort. 



File number and name of the input or Enter the correct file 
control file do not match. number and name, or 

mount the correct 
diskette, or enter STOP 
to end the sort. 

Input file and output file are the same Specify different files 
file. for input or output, or 

enter STOP to end the 

sort. 

Work file is the same as the input file Specify a work file that 
or output file. 'S different from the 

input or output file, or 
enter STOP to end the 
sort. 



Specify a valid name 
for the output file, or 
do not use an output 
file name, or enter 
STOP to end the sort. 

Specify a valid name 
for the output file, or 
delete the output file 
name, or enter STOP to 
end the sort. 

Change the output file 
system use, SYSAREA or ERRORSET, name, or delete the 
was specified for the output file output file name, or 

nam e. enter STOP to end the" 

sort. 



Output file name contains more than 
8 characters or has more than 8 
characters between periods. 



Invalid use of periods in a complex 
output file name. 



One of the names reserved for 



ALTS statement contains an invalid 
character. 

The logical not character (-i) appears 
on the screen in a sort control 
statement. 

Invalid number of characters between 
commas in the ALTS statement. 



R/W storage is not large enough to 
contain a control file physical record, 
or an ** statement (sort group name) 
was not found. 



Enter only hexadecimal 
characters (0-9, A-F), 
or enter STOP to end 
the sort. See 
three-step procedure 
under Error 304. 

Enter 4 hexadecimal 
characters between 
commas, or enter STOP 
to end the sort. 

Specify another file or 
enter STOP to end the 
sort. 
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SORT ERROR CODES (continued) 
Error Meaning 



321 



322 



323 



324 



325 



326 



327 



328 



329 



330 



331 



332 



333 



334 



Control group was not found. 



Too many records were encountered 
in a control group before the specified 
group was found. 

Logical record length of control file 
not 64. 

Control file is not a record I/O file 
with blocked-spanned records. 

Too many records in input file or the 
5110 user storage is not large enough 
to do the sort. 

R/W storage is not large enough to 
do the sort. 

R/W storage is not large enough to 
contain the control group that was 
found. 

Invalid length field for BASIC internal 
numeric short or long data type. 



User Response 

Specify a correct name 
or file, or enter STOP 
to end the sort. 

Specify another group 
name or enter STOP. 



Specify another file or 
enter STOP. 

Specify another file or 
enter STOP. 

Respond to the options. 



Mask location is not within logical 
record length. 



Mask position or length entry contains 
too many digits. 



No mask position or length entry. 



Mask position or length entry must be 
greater than zero. 

Mask type is not A, D, F, G, N, or 0. 



Total MASK length is greater than 64. 



Respond to the options. 

Specify another group 
or enter STOP. 

Enter 4 for short 
precision, or 8 for long 
precision, or enter 
STOP to end the sort. 

Correct the position or 
length of the mask 
field, or enter STOP to 
end the sort. 

Correct mask position 
(maximum of four 
digits) or length 
(maximum of two 
digits) entry, or enter 
STOP to end the sort. 

Specify a mask position 
and length entry, or 
enter STOP to end the 
sort. 

Correct the error, or 
enter STOP to end the 
sort. 

Correct the error or 
enter STOP to end the 
sort. 

Reduce the total MASK 
length, or enter STOP 
to end the sort. 
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SORT ERROR CODES (continued) 
Error Meaning 



335 



336 



337 



338 



339 



340 



341 



342 



343 



344 



345 



The block length of an 
unblocked-unspanned file is greater 
than the sector size. 

The block length for a 

blocked -spanned file does not equal 

the sector size. 

A work file is needed. 



Work file too small. 



Name of the output file already exists 
on the diskette. 



Output file too small. 



Output file or work file is a used file. 



Multivolume file was specified but 
cannot be used by the sort program. 

The referenced file application type 
not supported. 

The referenced file exchange type not 
supported. 

Variable-length logical records were 
specified but cannot be used by the 
sort program. 



User Response 

Specify a different file, 
or enter STOP to end 
the sort. 

Specify a different file, 
or enter STOP to end 
the sort. 

Enter a WORK 
statement, or enter 
STOP to end the sort. 

Enter option. Return to 
the calling language to 
increase size of work 
file, or enter STOP to 
end the sort. 

Change name of output 
file, or change diskette, 
or enter STOP to end 
the sort. 

If detected when the 
SORT statement was 
entered, specify another 
output file, or enter 
STOP to end the sort. 
If detected during the 
sort, the sort completed 
display appears; 
respond to the options. 

Specify unused files, or 
enter STOP to end the 
sort. 

Specify a different input 
file, or enter STOP to 
end the sort. 

Specify a different file, 
or enter STOP to end 
the sort. 

Specify a different file, 
or enter STOP to end 
the sort. 

Specify a different file, 
or enter STOP to end 
the sort. 
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SORT ERROR COOES (continued) 
Error Meaning 



346 



347 



349 



The input file must be a 
blocked-spanned or 
unblocked- unspanned file, or the 
control file must be a 
blocked-spanned file. 

Input file does not contain any 
records. 

The sector size of the control, input, 
output, or work file is not supported. 



User Response 

Specify a different file, 
or enter STOP to end 
the sort. 



Specify a different input 
file, or enter STOP to 
end the sort. 

Specify a file with a 
sector size of 128, 256, 
or 512 bytes. 



TAPE-TO-DISKETTE AND DISKETTE-TO-TAPE ERROR CODES 



350 



351 



352 



353 



354 



355 



356 



357 



Response to option was: 

- Not numeric 

- Not one of the valid responses 

Invalid file number was entered. 



Tape file name is invalid and will not 
be copied to the diskette file. 



File name that was entered is invalid. 



Diskette file is write-protected. 



Diskette file expiration date is not 
blank. 



File name of the tape file or the file 
name entered from the keyboard 
already exists on the diskette file (see 
Chapter 1). 

Tape file to be copied from is unused. 
An unused file cannot be copied. 



Enter correct response. 



Enter the file number, 
up to four digits. 

Enter a valid file name. 
This name will be used 
as the file name for the 
copied diskette file. 
(See Chapter 1). 

Enter a valid file name. 
(See Chapter 1). 

Restart the function and 
specify a 

non- write- protected 
diskette file for output. 

Restart the function and 
specify an unused 
diskette file for output. 

Enter a valid file name 
that does not already 
exist on the diskette 
file. 

Make sure you have not 
specified an unused file. 
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TAPE-TO-DISKETTE AND DISKETTE-TO-TAPE ERROR CODES 
(continued) 



Error 
358 

359 

361 

362 
363 
364 

365 

366 

367 
368 

369 

370 



Meaning 

Tape file to be copied from is type 4 
or 5. These file types cannot be 
copied. 

Tape file to be copied from is type 6 
or 26. These file types cannot be 
copied. 

Tape file to be copied from is type 
16, 17, 18, or 19. These file types 
cannot be copied. 

Tape file has an invalid file type. 

Diskette file has an invalid file type. 

Diskette file to be copied from is type 
26. These file types cannot be 
copied. 

Diskette file to be copied from is type 
10. A type 10 file cannot be copied. 

Diskette file to be copied from is 
unused (EOD » BOE). An unused file 
cannot be copied. 

Diskette sector size is 1024 bytes. 
This size is not supported. 

The header label on the diskette is 
not correct. 



The logical record length in the tape 
header is zero. 



Diskette file to be copied from is type 
15. This file type cannot be copied. 



TAPE-TO-TAPE ERROR CODES 



375 

376 
377 

378 

379 



Invalid entry was made to select an 
option. 

Invalid file number was entered. 

Invalid tape drive number was 
entered. 

Input file contains no data (file type 
00). 

Output tape file is not marked. 



User Response 

Make sure you have not 
specified a type 4 or 5 
file. 

Make sure you have not 
specified a type 6 or 26 
file. 

Make sure you have not 
specified a type 16, 17, 
18, or 19 file. 

Make sure the tape file 
has a valid file type. 

Make sure the diskette 
file has a valid file type. 

Make sure you have not 
specified a file type 26 
file. 

Make sure you have not 
specified a file type 10 
file. 

Make sure you have not 
specified an unused file. 

Use a different diskette 
that has a valid format. 

Use diskette recovery 
function to create a 
valid header. 

Use diskette recovery 
function to create a 
valid header. 

Make sure you have not 
specified a type 1 5 file. 



Reenter the option 
entry. 

Reenter file number. 

Reenter tape drive 
number. 

Reenter input file 
number. 

Mark the output file 
and restart the copy 
operation. 
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DISKETTE-TO-DISKETTE ERROR CODES 
Error Meaning 



400 
401 
402 

403 



404 

405 
406 
407 
408 
409 
410 

411 

412 
413 



Invalid response to an option. 

Invalid file number was entered. 

Invalid diskette drive number was 
entered. 

The output diskette has a different 
sector size, a smaller format number 
(less capacity), or fewer cylinders set 
aside for the extended label area than 
the input diskette. When the label 
area causes the error, the number of 
cylinders for each diskette is 
displayed. 

Input diskette sector size is not equal 
to that of the output diskette. 

Output file is not marked. 

Input diskette sector size is 1024 
bytes. This size is not supported. 

Output diskette sector size is 1024 
bytes. This size is not supported. 

Input diskette file contains no data. 
Invalid file name was entered. 



The output file has the file- protect 
indicator on. 



The expiration date on the output file 
is not blank. 



No files exist on the input diskette. 



The diskette cover was not opened. 



User Response 

Enter the correct 
response. 

Reenter the file number, 
up to four digits. 

Reenter correct diskette 
drive number: 1, 2, 3, 
or 4. 

Use an output diskette 
that has the same 
sector side, the same or 
larger format number, 
and the same or larger 
label area than the 
input diskette. 

Make sure both 
diskettes have the same 
sector size. 

Mark the output file or 
use a different file. 

Use a different diskette 
that has a valid format. 

Use a different diskette 
that has a valid format. 

Reenter the input file 
number. 

Enter a valid file name 
(see Chapter 1). 

Use a file that is not 
file- protected for 
output. 

Use a different file with 
a blank expiration date 
for output. 

Use a diskette that 
contains files. 

Press the EXECUTE key 
if the input files are on 
the same diskette, or 
insert the correct 
diskette. 
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DISKETTE-TO-DISKETTE ERROR CODES (continued) 

Error Meaning User Response 

414 During image copy on a one drive Restart image copy or 
system, the original diskette was not return to system, 
used when prompting for the from 

diskette. 

415 During image copy, the output Initialize the output 
diskette has different sector size, diskette to the same 
diskette type, or extended labels than attributes as the input 
the input diskette. diskette. 

416 During image copy, the response If two drives are to be 
indicated two diskette drives were to used, a different 

be used and the same drive number number must be 

was used for the from and the to specified for the from 

drive. and the to drives. 



Error Codes 102.1 



This page intentionally left blank. 



102.2 



COMPRESS ERROR CODES 
Error Meaning 



425 



426 



Invalid entry was made to select an 
option. 

Input diskette sector size is 1024 
bytes. This size is not supported. 



LABEL DISPLAY 



430 

431 

432 
433 

434 
436 

437 



Invalid selection of options or the 
input line is not correct format. 



A file number of zero was specified 
or the first file number of a range 
was greater than the second. 

A file number larger than what can 
exist on the media was specified. 

The volume is access- protected. 
Labels cannot be displayed when 
volume is access- protected. 

Diskette drive door was opened 
before last file header was read. 

The end of the marked tape was 
found. 

The tape is not marked for the tape 
header that was specified. 



INITIALIZATION ERROR CODES 

450 I NIT is not in correct position. 



452 



453 



Characters used for volume 
identification are not alphameric. 

VOL- ID field of initialization command 
contains more than 6 characters. 



User Response 

Reenter the option 
entry. 

Use a different diskette 
that has a valid format. 



Reenter, starting in 
position 1, the options 
given in the prompting 
message. 

Enter a valid file 
number or range. 

Select another option. 

Select another option. 



Select another option. 

Respond to the 
message by selecting 
an option. 

Respond to the 
message by selecting 
an option. 



Make sure INIT is in 
positions 1 to 4 of the 
initialization command. 

Make sure all 
characters are 
alphameric. 

Make sure not more 
than 6 characters are 
entered for the volume 
identification field. 
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INITIALIZATION ERROR CODES (continued) 
Error Meaning 



454 
455 

457 
458 

459 

460 



461 



462 



464 



465 



466 



467 



Characters used for owner 
identification are not alphameric. 

OWNER-ID field of initialization 
command contains more than 14 
characters. 

Invalid format specified. 

Sector sequence number is not a 
two-digit number. 

Invalid number specified for sector 
sequence. 

Invalid entry made for increasing the 
number of labels on format 7, 8, or 9 
diskettes. 



Diskette drive number was not found 
in position 1. 



A nonnumeric character was found 
for the diskette drive number in 
position 1. 

Response to option was: 

- Not in position 1 

- Not numeric 

- Not one of the valid responses 

More than two bad cylinders found 
during initialization. 

A comma was not found where one 
was expected in the initialization 
command. 



User Response 

Make sure all 
characters are 
alphameric. 

Make sure not more 
than 14 characters are 
entered for the owner 
identification field. 

The valid entries are the 
digits 1 through 9. 

Enter sector sequence 
number as a two-digit 
number. 

Enter correct number; 
see chart in Diskette 
Format for valid entries. 

Valid entries are blank 
and digits 1 through 9. 
The digits must be 
entered in position 1 
with position 2 blank. 
Reenter. 

Enter diskette drive 
number in position 1 ; 
valid entries are 1, 2, 3, 
or 4. 

Enter 1, 2, 3, or 4 to 
select the diskette drive 
in position 1. 

Retry. If error occurs 
again, diskette could be 
defective. 

Retry. If error occurs 
again, diskette could be 
defective. 

Make sure all commas 
are present; a comma 
must separate each 
parameter. 



The position after the two-digit sector Make sure a blank 
sequence number is not blank. follows the sector 

sequence number. 
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INITIALIZATION ERROR CODES (continued) 
Error Meaning 



468 



469 



470 



471 



472 



473 



474 



A secure data set was found. 



A write-protected data set was 
found. 



A used data set (EOD is greater than 
BOE) was found. 

A data set with a nonblank expiration 
field was found. 

A Diskette 1 type diskette is in the 
drive, and a format of 4 through 9 
was specified. 

A Diskette 2 type diskette is in the 
drive, and a format of 1 , 2, or 3 was 
specified. 

Cylinder zero is defective. Cylinder 
must be defect free. 



LOADER ERROR CODE 

475 Invalid number entered for an option. 

476 The file to be loaded from is not a 
type 22 file. 



477 



478 



479 



480 



The program you are trying to load 
does not have a valid feature code. 



You are trying to load a feature 
program that is already loaded. 

Not enough space remains in the 
work area to load the feature 
program. 

You are trying to load the translated 
sort messages, and they are already 
loaded. 



User Response 

Respond to the 
message by selecting 
an option. 

Respond to the 
message by selecting 
an option. 

Respond to the 
message by selecting 
an option. 

Respond to the 
message by selecting 
an option. 

Format 1, 2, or 3 must 
be specified for 
Diskette 1 type 
diskettes. 

Formats 4 through 9 
must be specified for 
Diskette 2 type 
diskettes. 

Retry; if error occurs 
again, diskette could be 
defective. 



Enter a valid number. 

Feature programs must 
be on a type 22 file. 
Press the EXECUTE key 
to get the option to 
stop or continue. 

Press the EXECUTE key 
to get the option to 
stop or continue. 

Press the EXECUTE key 
to get the option to 
stop or continue. 

Press the EXECUTE key 
to get the option to 
stop or continue. 

Press the EXECUTE key 
to get the option to 
stop or continue. 
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LOADER ERROR CODE (continued) 
Error Meaning 



481 
482 
483 
484 

485 

486 
487 
488 



An invalid or incorrect hexadecimal 
character was entered. 

There is no IMF for the problem 
number you entered. 

The IMF is not for your system. 



The IMF problem number you entered 
already exists. 

There is no preformatted record in the 
IMF file for your key-entered IMF. 

An invalid or incorrect file number 
was entered. 

Blank in the file name. 

Too many characters entered for a 
response to a prompt. 



User Response 

Correct and reenter the 
character. 

Enter a different 
problem number. 

Enter a different 
problem number. 

Enter a different 
problem number for 
your IMF. 

You cannot enter the 
IMF. Get a different 
IMF file from IBM. 

Enter the file number, 
up to four digits. 

Enter a valid file name 
(see Chapter 1). 

Enter the correct 
number of characters 
for the response to the 
prompt. 
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